This commit is contained in:
Jean-Philippe Bernardy 2016-11-08 20:34:52 +01:00
parent a218610425
commit 3121f6f57d

View file

@ -173,10 +173,9 @@ line."
(interactive)
(if mark-active
(exchange-point-and-mark)
(if (mark)
(progn
(goto-char (mark))
(pop-mark)))))
(when (mark)
(goto-char (mark))
(pop-mark))))
(defun boon-switch-mark-quick ()
"Pop the mark ring until we find ourselves on a different line."