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

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

[elpa] externals/org e0b1a05: org-persist-unregister: Fix when BUFFER is


From: ELPA Syncer
Subject: [elpa] externals/org e0b1a05: org-persist-unregister: Fix when BUFFER is not 'all
Date: Tue, 21 Dec 2021 21:57:24 -0500 (EST)

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

    org-persist-unregister: Fix when BUFFER is not 'all
    
    * lisp/org-persist.el (org-persist-unregister): Use `string=' instead
    of `eq' to compare strings.  `eq' always returns nil here.
---
 lisp/org-persist.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index 43978d8..80bbf7b 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -159,10 +159,10 @@ When BUFFER is `all', unregister VAR in all buffers."
          (lambda (plist)
            (when (and (memq var (plist-get plist :variable))
                       (or (eq buffer 'all)
-                          (eq (buffer-file-name
-                               (or (buffer-base-buffer buffer)
-                                   buffer))
-                              (plist-get plist :path))))
+                          (string= (buffer-file-name
+                                    (or (buffer-base-buffer buffer)
+                                        buffer))
+                                   (or (plist-get plist :path) ""))))
              (if (> (length (plist-get plist :variable)) 1)
                  (progn
                    (setq plist



reply via email to

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