From ac9180045dd47bc30c6d990d08fef15436046e83 Mon Sep 17 00:00:00 2001 From: Ian Kelling Date: Thu, 29 May 2025 21:48:02 -0400 Subject: [PATCH] fix that visible-mark-active hangs around until the next command when the mark is not really active --- visible-mark.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/visible-mark.el b/visible-mark.el index f123509..1d96215 100644 --- a/visible-mark.el +++ b/visible-mark.el @@ -189,7 +189,7 @@ the last defined face will be reused." (overlays visible-mark-overlays) (faces visible-mark-faces) (faces-forward visible-mark-forward-faces)) - (if mark-active (setq faces (cons 'visible-mark-active (cdr faces)))) + (when (and mark-active (not deactivate-mark)) (setq faces (cons 'visible-mark-active (cdr faces)))) (dotimes (i visible-mark-max) (visible-mark-move-overlay (pop overlays) (pop marks) (car faces)) (if (cdr faces) (pop faces))) -- 2.30.2