forked from mirrors/org-mode
lisp/org-persist.el (and): Fix typo
Use `unless' instead of erroneous `when' in the test whether to run lockfile timer. Reported-by: Karthik Chikmagalur
This commit is contained in:
parent
afc529b4a0
commit
15e51d7083
|
@ -1313,11 +1313,11 @@ such scenario."
|
||||||
(defvar org-persist--refresh-gc-lock-timer nil
|
(defvar org-persist--refresh-gc-lock-timer nil
|
||||||
"Timer used to refresh session timestamp in `org-persist-gc-lock-file'.")
|
"Timer used to refresh session timestamp in `org-persist-gc-lock-file'.")
|
||||||
|
|
||||||
(when (and org-persist--disable-when-emacs-Q
|
(unless (and org-persist--disable-when-emacs-Q
|
||||||
;; FIXME: This is relying on undocumented fact that
|
;; FIXME: This is relying on undocumented fact that
|
||||||
;; Emacs sets `user-init-file' to nil when loaded with
|
;; Emacs sets `user-init-file' to nil when loaded with
|
||||||
;; "-Q" argument.
|
;; "-Q" argument.
|
||||||
(not user-init-file))
|
(not user-init-file))
|
||||||
(unless org-persist--refresh-gc-lock-timer
|
(unless org-persist--refresh-gc-lock-timer
|
||||||
(setq org-persist--refresh-gc-lock-timer
|
(setq org-persist--refresh-gc-lock-timer
|
||||||
(run-at-time nil org-persist-gc-lock-interval #'org-persist--refresh-gc-lock))))
|
(run-at-time nil org-persist-gc-lock-interval #'org-persist--refresh-gc-lock))))
|
||||||
|
|
Loading…
Reference in New Issue