changeset 19307:5745bc43cfe9

Customized. (only-global-abbrevs): Doc fix.
author Richard M. Stallman <rms@gnu.org>
date Mon, 11 Aug 1997 23:54:58 +0000
parents 974544be1a17
children f7a109d11c10
files lisp/abbrev.el
diffstat 1 files changed, 17 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/abbrev.el	Mon Aug 11 23:51:04 1997 +0000
+++ b/lisp/abbrev.el	Mon Aug 11 23:54:58 1997 +0000
@@ -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 @@
 	(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.")