[elpa] externals/org b9d0d06 2/2: org-persist.el: Do not use hook depth unnecessarily

[ELPA Syncer]

branch: externals/org
commit b9d0d06ca5181806bc710f80ed10487dd066fc9c
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    org-persist.el: Do not use hook depth unnecessarily
    
    * lisp/org-persist.el: Do not use hook depth to define the order of
    `org-persist-gc' and `org-persist-write-all'.  Rely on default
    behaviour of `add-hook' instead.
    (org-persist-register): Use default hook depth.
---
 lisp/org-persist.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 93fbb8d..c3fd1c2 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -123,7 +123,7 @@ dependency means that data shared between variables will be 
preserved
                          (cons var (plist-get inherited-index :variable)))))))
   (org-persist--get-index var buffer)
   (when buffer
-    (add-hook 'kill-buffer-hook #'org-persist-write-all-buffer 1000 'local)))
+    (add-hook 'kill-buffer-hook #'org-persist-write-all-buffer 'local)))
 
 (defun org-persist-unregister (var &optional buffer)
   "Unregister VAR in BUFFER to be persistent.
@@ -285,8 +285,10 @@ When BUFFER is `all', unregister VAR in all buffers."
   (if (not (file-writable-p dir))
       (message "Missing write access rights to org-persist-directory: %S"
                org-persist-directory)
-    (add-hook 'kill-emacs-hook #'org-persist-gc)
-    (add-hook 'kill-emacs-hook #'org-persist-write-all 100)))
+    (add-hook 'kill-emacs-hook #'org-persist-write-all)
+    ;; `org-persist-gc' should run before `org-persist-write-all'.  So we are 
adding the
+    ;; hook after `org-persist-write-all'.
+    (add-hook 'kill-emacs-hook #'org-persist-gc)))
 
 (add-hook 'after-init-hook #'org-persist-read-all)