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

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

[elpa] externals/org f3bd1dcb77 20/31: org-persist: Fix compiler warning


From: ELPA Syncer
Subject: [elpa] externals/org f3bd1dcb77 20/31: org-persist: Fix compiler warnings
Date: Sat, 29 Jan 2022 04:58:11 -0500 (EST)

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

    org-persist: Fix compiler warnings
---
 lisp/org-persist.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 98d2f11afb..5c3858959e 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -449,7 +449,7 @@ MISC, if non-nil will be appended to the collection."
 (defun org-persist--normalize-associated (associated)
   "Normalize ASSOCIATED representation into (:type value)."
   (pcase associated
-    ((or (pred stringp) `(:file ,associated2))
+    ((or (pred stringp) `(:file ,_))
      (unless (stringp associated)
        (setq associated (cadr associated)))
      (let* ((rtn `(:file ,associated))
@@ -458,7 +458,7 @@ MISC, if non-nil will be appended to the collection."
                          (file-attributes associated)))))
        (when inode (plist-put rtn :inode inode))
        rtn))
-    ((or (pred bufferp) `(:buffer ,associated2))
+    ((or (pred bufferp) `(:buffer ,_))
      (unless (bufferp associated)
        (setq associated (cadr associated)))
      (let ((cached (gethash associated org-persist--associated-buffer-cache))



reply via email to

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