aboutsummaryrefslogtreecommitdiff
path: root/perspective.el
diff options
context:
space:
mode:
Diffstat (limited to 'perspective.el')
-rw-r--r--perspective.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/perspective.el b/perspective.el
index 5ac3d39..1254f60 100644
--- a/perspective.el
+++ b/perspective.el
@@ -2209,6 +2209,7 @@ were merged in from a previous call to `persp-merge'."
(with-eval-after-load 'xref
(defvar persp--xref-marker-ring (make-hash-table :test 'equal))
(if (boundp 'xref--history)
+ ;; Emacs 29:
(defun persp--set-xref-marker-ring ()
"Set xref--history per persp."
(let ((persp-curr-name (persp-name (persp-curr))))
@@ -2216,6 +2217,7 @@ were merged in from a previous call to `persp-merge'."
(puthash persp-curr-name (cons nil nil)
persp--xref-marker-ring))
(setq xref--history (gethash persp-curr-name persp--xref-marker-ring))))
+ ;; Emacs 28 and earlier:
(defun persp--set-xref-marker-ring ()
"Set xref--marker-ring per persp."
(let ((persp-curr-name (persp-name (persp-curr))))
@@ -2225,7 +2227,6 @@ were merged in from a previous call to `persp-merge'."
(setq xref--marker-ring (gethash persp-curr-name persp--xref-marker-ring))))))
-
;;; --- done
;;; XXX: Undo nasty kludge necessary for cleanly compiling this source file by