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

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

[elpa] externals/vundo e89a292c15 19/58: Rename vundo--mode to vundo-mod


From: ELPA Syncer
Subject: [elpa] externals/vundo e89a292c15 19/58: Rename vundo--mode to vundo-mode
Date: Fri, 15 Apr 2022 12:58:13 -0400 (EDT)

branch: externals/vundo
commit e89a292c150c50e3a4768736601b63e6e0dfabab
Author: Yuan Fu <casouri@gmail.com>
Commit: Yuan Fu <casouri@gmail.com>

    Rename vundo--mode to vundo-mode
    
    * vundo.el (vundo--mode-map, vundo--mode): Rename to vundo-mode.
    (vundo-1, vundo--check-for-command): Use new functions.
---
 vundo.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/vundo.el b/vundo.el
index 5ba9ad4180..7a9d96b8f1 100644
--- a/vundo.el
+++ b/vundo.el
@@ -474,7 +474,7 @@ WINDOW is the window that was/is displaying the vundo 
buffer."
       (with-selected-window window
         (kill-buffer-and-window))))
 
-(defvar vundo--mode-map
+(defvar vundo-mode-map
   (let ((map (make-sparse-keymap)))
     (define-key map (kbd "f") #'vundo-forward)
     (define-key map (kbd "<right>") #'vundo-forward)
@@ -492,9 +492,9 @@ WINDOW is the window that was/is displaying the vundo 
buffer."
     (define-key map (kbd "i") #'vundo--inspect)
     (define-key map (kbd "d") #'vundo--debug)
     map)
-  "Keymap for ‘vundo--mode’.")
+  "Keymap for ‘vundo-mode’.")
 
-(define-derived-mode vundo--mode special-mode
+(define-derived-mode vundo-mode special-mode
   "Vundo" "Mode for displaying the undo tree."
   (setq mode-line-format nil
         truncate-lines t
@@ -641,8 +641,8 @@ BUFFER must have a valid `buffer-undo-list'."
       (with-current-buffer vundo-buf
         ;; Enable major mode before refreshing the buffer.
         ;; Because major modes kill local variables.
-        (unless (derived-mode-p 'vundo--mode)
-          (vundo--mode))
+        (unless (derived-mode-p 'vundo-mode)
+          (vundo-mode))
         (vundo--refresh-buffer orig-buf vundo-buf)
         vundo-buf))))
 
@@ -650,7 +650,7 @@ BUFFER must have a valid `buffer-undo-list'."
   "Sanity check before running interactive commands.
 Do sanity check, then evaluate BODY."
   `(progn
-     (when (not (derived-mode-p 'vundo--mode))
+     (when (not (derived-mode-p 'vundo-mode))
        (user-error "Not in vundo buffer"))
      (when (not (buffer-live-p vundo--orig-buffer))
        (when (y-or-n-p "Original buffer is gone, kill vundo buffer? ")



reply via email to

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