branch: externals/org
commit f3bd1dcb77b664f6bffc64188baa29d69ccdbb20
Author: Ihor Radchenko <yanta...@gmail.com>
Commit: Ihor Radchenko <yanta...@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))
