[elpa] externals/org a5c86a48a5 8/8: org-persist--merge-index-with-disk: Fix cleaning up empty index dir

[ELPA Syncer]

branch: externals/org
commit a5c86a48a5e97a0eb45dbbc63fb683172aa7c18d
Author: Ihor Radchenko <yanta...@posteo.net>
Commit: Ihor Radchenko <yanta...@posteo.net>

    org-persist--merge-index-with-disk: Fix cleaning up empty index dir
    
    * lisp/org-persist.el (org-persist--merge-index-with-disk): Load index
    if it is not yet loaded.  This will call `org-persist-load:index' that
    takes care about initial index setup and cleaning up when reading
    index fails.
---
 lisp/org-persist.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 64f1afd179..5594395cbd 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -956,6 +956,7 @@ Otherwise, return t."
 
 (defun org-persist--merge-index-with-disk ()
   "Merge `org-persist--index' with the current index file on disk."
+  (org-persist--load-index)
   (let* ((index-file
           (org-file-name-concat org-persist-directory org-persist-index-file))
          (disk-index