diff --git a/lisp/org-persist.el b/lisp/org-persist.el index 43978d857..80bbf7b05 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