emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org 14bfe2841c 5/9: org-persist: Use `list-data-mode' f


From: ELPA Syncer
Subject: [elpa] externals/org 14bfe2841c 5/9: org-persist: Use `list-data-mode' for stored data
Date: Thu, 29 Dec 2022 04:58:03 -0500 (EST)

branch: externals/org
commit 14bfe2841c164874d90a9485f459228366098682
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-persist: Use `list-data-mode' for stored data
    
    * lisp/org-persist.el (org-persist-version): Bump version.
    (org-persist-index-file): Use .eld extension by default.
    (org-persist--index): Set mode in buffer-local variable line.
---
 lisp/org-persist.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index aee2070319..b2a92667a8 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -161,7 +161,7 @@
 (declare-function org-at-heading-p "org" (&optional invisible-not-ok))
 
 
-(defconst org-persist--storage-version "2.7"
+(defconst org-persist--storage-version "3.0"
   "Persistent storage layout version.")
 
 (defgroup org-persist nil
@@ -219,7 +219,7 @@ function will be called with a single argument - 
collection."
                  (number :tag "Keep N days")
                  (function :tag "Function")))
 
-(defconst org-persist-index-file "index"
+(defconst org-persist-index-file "index.eld"
   "File name used to store the data index.")
 
 (defvar org-persist--disable-when-emacs-Q t
@@ -337,6 +337,7 @@ FORMAT and ARGS are passed to `message'."
     (unless (file-exists-p (file-name-directory file))
       (make-directory (file-name-directory file) t))
     (with-temp-file file
+      (insert ";;   -*- mode: lisp-data; -*-\n")
       (if pp
           (pp data (current-buffer))
         (prin1 data (current-buffer))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]