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

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

[elpa] externals/org 7a6f48a: org-persist-read: Do not raise warning on


From: ELPA Syncer
Subject: [elpa] externals/org 7a6f48a: org-persist-read: Do not raise warning on known read error
Date: Mon, 1 Nov 2021 08:57:23 -0400 (EDT)

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

    org-persist-read: Do not raise warning on known read error
---
 lisp/org-persist.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 8c62318..a54276c 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -249,8 +249,10 @@ When BUFFER is `all', unregister VAR in all buffers."
           (condition-case err
               (setq data (read (current-buffer)))
             (error
-             (warn "Emacs reader failed to read data for %S:%S. The error was: 
%S"
-                   (or buffer "global") var (error-message-string err))
+             ;; Do not report the known error to user.
+             (unless (string-match-p "Invalid read syntax" 
(error-message-string err))
+               (warn "Emacs reader failed to read data for %S:%S. The error 
was: %S"
+                     (or buffer "global") var (error-message-string err)))
              (setq data nil))))
         (with-current-buffer (or buffer (current-buffer))
           (cl-loop for var1 in (plist-get index :variable)



reply via email to

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