From: Ian Kelling <iank@fsf.org>
Date: Fri, 30 May 2025 01:48:02 +0000 (-0400)
Subject: fix that visible-mark-active hangs around until the next command when the mark is... 
X-Git-Url: https://iankelling.org/git/?a=commitdiff_plain;h=HEAD;p=visible-mark

fix that visible-mark-active hangs around until the next command when the mark is not really active
---

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)))