emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/undo-fu-session f9589be462 22/53: Global mode is no longer


From: ELPA Syncer
Subject: [nongnu] elpa/undo-fu-session f9589be462 22/53: Global mode is no longer enables in special-modes
Date: Thu, 7 Jul 2022 12:05:17 -0400 (EDT)

branch: elpa/undo-fu-session
commit f9589be46215ce25e90181bd54ef8316a47ee58a
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Global mode is no longer enables in special-modes
    
    Non text modes such as package-list no longer enable undo-fu-session.
---
 changelog.rst      |  1 +
 undo-fu-session.el | 10 +++++++++-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/changelog.rst b/changelog.rst
index 6e7fbef7b9..a3958ff315 100644
--- a/changelog.rst
+++ b/changelog.rst
@@ -5,6 +5,7 @@ Change Log
 
 - In development
 
+  - Disable ``global-undo-fu-session`` in ``special-mode`` and it's derived 
modes (such as ``package-menu-mode``).
   - Add ``undo-fu-session-ignore-encrypted-files`` to ignore encrypted files.
   - Fix bug when ``undo-fu-session-linear`` was enabled,
     causing an empty undo history to disable undo entirely on reload.
diff --git a/undo-fu-session.el b/undo-fu-session.el
index f63236e00c..c21ea4240a 100644
--- a/undo-fu-session.el
+++ b/undo-fu-session.el
@@ -580,7 +580,15 @@ Argument PENDING-LIST an `pending-undo-list'. compatible 
list."
 
 (defun undo-fu-session-mode-turn-on ()
   "Enable command `undo-fu-session-mode'."
-  (when (and (not (minibufferp)) (not (bound-and-true-p undo-fu-session-mode)))
+  (when
+    (and
+      ;; Not already enabled.
+      (not (bound-and-true-p undo-fu-session-mode))
+      ;; Not in the mini-buffer.
+      (not (minibufferp))
+      ;; Not a special mode (package list, tabulated data ... etc)
+      ;; Instead the buffer is likely derived from `text-mode' or `prog-mode'.
+      (not (derived-mode-p 'special-mode)))
     (undo-fu-session-mode 1)))
 
 ;;;###autoload



reply via email to

[Prev in Thread] Current Thread [Next in Thread]