Commit 497afe07 authored by Stefan Monnier's avatar Stefan Monnier

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

parent ad0d18af
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.
......
......@@ -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.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment