[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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org 7a6f48a: org-persist-read: Do not raise warning on known read error,
ELPA Syncer <=