mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(abbrev-mode): Use define-minor-mode.

Browse Source
This commit is contained in:
Stefan Monnier 2008-04-01 08:36:57 +00:00
parent ad0d18af63
commit 497afe074a
2 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/ChangeLog
View File

@ -1,5 +1,7 @@
2008-04-01 Stefan Monnier <monnier@iro.umontreal.ca>
* abbrev.el (abbrev-mode): Use define-minor-mode.
* mouse.el (mouse-major-mode-menu-prefix): Remove. Remove uses.
(mouse-menu-non-singleton): Rename from mouse-major-mode-menu-1.
Use map-keymap.

9
lisp/abbrev.el
View File

@ -49,16 +49,11 @@ define global abbrevs instead."
:group 'abbrev-mode
:group 'convenience)
(defun abbrev-mode (&optional arg)
(define-minor-mode abbrev-mode
"Toggle Abbrev mode in the current buffer.
With optional argument ARG, turn abbrev mode on if ARG is
positive, otherwise turn it off. In Abbrev mode, inserting an
abbreviation causes it to expand and be replaced by its expansion."
(interactive "P")
(setq abbrev-mode
(if (null arg) (not abbrev-mode)
(> (prefix-numeric-value arg) 0)))
(force-mode-line-update))
abbreviation causes it to expand and be replaced by its expansion.")
(defcustom abbrev-mode nil
"Enable or disable Abbrev mode.