master fe54cf0b1f 1/2: Do interactive mode tagging for edit-abbrevs-mode

[Stefan Kangas]

branch: master
commit fe54cf0b1fbdffebc674c795182dc703d056dbd8
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Do interactive mode tagging for edit-abbrevs-mode
    
    * lisp/abbrev.el (edit-abbrevs-redefine)
    (abbrev-edit-save-to-file, abbrev-edit-save-buffer): Interactive mode
    tagging for edit-abbrevs-mode.
    (edit-abbrevs-mode): Make non-interactive.
---
 lisp/abbrev.el | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index 448e184255..515c046ce5 100644
--- a/lisp/abbrev.el
+++ b/lisp/abbrev.el
@@ -168,7 +168,7 @@ or may be omitted (it is usually omitted)."
 
 (defun edit-abbrevs-redefine ()
   "Redefine abbrevs according to current buffer contents."
-  (interactive)
+  (interactive nil edit-abbrevs-mode)
   (save-restriction
     (widen)
     (define-abbrevs t)
@@ -269,7 +269,8 @@ have been saved."
    (list (read-file-name "Save abbrevs to file: "
                         (file-name-directory
                          (expand-file-name abbrev-file-name))
-                        abbrev-file-name)))
+                         abbrev-file-name))
+   edit-abbrevs-mode)
   (edit-abbrevs-redefine)
   (write-abbrev-file file t))
 
@@ -277,7 +278,7 @@ have been saved."
   "Save all user-level abbrev definitions in current buffer.
 The saved abbrevs are written to the file specified by
 `abbrev-file-name'."
-  (interactive)
+  (interactive nil edit-abbrevs-mode)
   (abbrev-edit-save-to-file abbrev-file-name))
 
 
@@ -1188,7 +1189,8 @@ SORTFUN is passed to `sort' to change the default 
ordering."
 (define-derived-mode edit-abbrevs-mode fundamental-mode "Edit-Abbrevs"
   "Major mode for editing the list of abbrev definitions.
 This mode is for editing abbrevs in a buffer prepared by `edit-abbrevs',
-which see.")
+which see."
+  :interactive nil)
 
 (provide 'abbrev)