From 7a6f48ab4aab5949a5f32fb8f420023a31c68c62 Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Mon, 1 Nov 2021 20:47:11 +0800 Subject: [PATCH] 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 8c62318fe..a54276c7b 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)