From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 11 Aug 1997 23:54:58 +0000 (+0000)
Subject: Customized.
X-Git-Tag: emacs-20.1~641
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1d1e35a0d639100eb849bcf90afa3879e9ba05ac;p=emacs.git

Customized.
(only-global-abbrevs): Doc fix.
---

diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index ff6ae3ac672..a2a54074e3a 100644
--- a/lisp/abbrev.el
+++ b/lisp/abbrev.el
@@ -27,9 +27,12 @@
 
 ;;; Code:
 
-(defvar only-global-abbrevs nil "\
-*t means user plans to use global abbrevs only.
-Makes the commands to define mode-specific abbrevs define global ones instead.")
+(defcustom only-global-abbrevs nil 
+  "*t means user plans to use global abbrevs only.
+This makes the commands that normally define mode-specific abbrevs
+define global abbrevs instead."
+  :type 'boolean
+  :group 'abbrev-mode)
 
 (defun abbrev-mode (arg)
   "Toggle abbrev mode.
@@ -41,6 +44,17 @@ and be replaced by its expansion."
 	(if (null arg) (not abbrev-mode)
 	  (> (prefix-numeric-value arg) 0)))
   (force-mode-line-update))
+
+(defcustom abbrev-mode nil
+  "Toggle abbrev mode.
+In abbrev mode, inserting an abbreviation causes it to expand
+and be replaced by its expansion.
+You must modify via \\[customize] for this variable to have an effect."
+  :set (lambda (symbol value)
+	 (abbrev-mode (if value 1 0)))
+  :type 'boolean
+  :group 'abbrev-mode)
+
 
 (defvar edit-abbrevs-map nil
   "Keymap used in edit-abbrevs.")