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

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

[nongnu] elpa/iedit 307262b25a 093/301: (add-hook 'change-major-mode-hoo


From: ELPA Syncer
Subject: [nongnu] elpa/iedit 307262b25a 093/301: (add-hook 'change-major-mode-hook 'iedit-done nil t)
Date: Mon, 10 Jan 2022 22:58:53 -0500 (EST)

branch: elpa/iedit
commit 307262b25a9e7e723d01d827b07c1d47db30f4c7
Author: Victor Ren <victorhge@gmail.com>
Commit: Victor Ren <victorhge@gmail.com>

    (add-hook 'change-major-mode-hook 'iedit-done nil t)
---
 iedit.el | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/iedit.el b/iedit.el
index 12c47aa7a8..8fba96b9f5 100644
--- a/iedit.el
+++ b/iedit.el
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 2010, 2011, 2012 Victor Ren
 
-;; Time-stamp: <2012-07-03 15:00:38 Victor Ren>
+;; Time-stamp: <2012-07-03 22:34:00 Victor Ren>
 ;; Author: Victor Ren <victorhge@gmail.com>
 ;; Keywords: occurrence region simultaneous rectangle refactoring
 ;; Version: 0.95
@@ -500,7 +500,8 @@ Commands:
   (setq iedit-current-keymap iedit-occurrence-keymap)
   (iedit-refresh occurrence-exp beg end)
   (run-hooks 'iedit-mode-hook)
-  (add-hook 'kbd-macro-termination-hook 'iedit-done))
+  (add-hook 'kbd-macro-termination-hook 'iedit-done nil t)
+  (add-hook 'change-major-mode-hook 'iedit-done nil t))
 
 (defun iedit-refresh (occurrence-exp beg end)
   "Refresh Iedit mode."
@@ -558,7 +559,8 @@ Commands:
                     'face 'font-lock-warning-face))
   (force-mode-line-update)
   (run-hooks 'iedit-mode-hook)
-  (add-hook 'kbd-macro-termination-hook 'iedit-done))
+  (add-hook 'kbd-macro-termination-hook 'iedit-done nil t)
+  (add-hook 'change-major-mode-hook 'iedit-done nil t))
 
 (defun iedit-done ()
   "Exit Iedit mode.
@@ -580,7 +582,8 @@ the initial string globally."
   (setq iedit-before-modification-undo-list nil)
   (setq iedit-mode nil)
   (force-mode-line-update)
-  (remove-hook 'kbd-macro-termination-hook 'iedit-done)
+  (remove-hook 'kbd-macro-termination-hook 'iedit-done t)
+  (remove-hook 'change-major-mode-hook 'iedit-done t)
   (run-hooks 'iedit-mode-end-hook))
 
 (defun iedit-execute-last-modification (&optional arg)



reply via email to

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