summaryrefslogtreecommitdiff
path: root/lisp/hippie-exp.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-05-30 05:30:58 +0000
committerRichard M. Stallman <rms@gnu.org>1997-05-30 05:30:58 +0000
commit86414c3ca0a38442d0df120d5573e756e7a49044 (patch)
tree050e8465d9713041301d4d75080a8272f4a3f786 /lisp/hippie-exp.el
parent30178dde79a3311bd61bf9ba4c41f6cdd7ea5706 (diff)
downloademacs-86414c3ca0a38442d0df120d5573e756e7a49044.tar.gz
(he-dabbrev-skip-space, he-dabbrev-as-symbol):
Move definitions up. Use defcustom.
Diffstat (limited to 'lisp/hippie-exp.el')
-rw-r--r--lisp/hippie-exp.el16
1 files changed, 10 insertions, 6 deletions
diff --git a/lisp/hippie-exp.el b/lisp/hippie-exp.el
index bc87eab2688..dfb36f37f43 100644
--- a/lisp/hippie-exp.el
+++ b/lisp/hippie-exp.el
@@ -161,6 +161,16 @@
"Expand text trying various ways to find its expansion."
:group 'abbrev)
+(defcustom he-dabbrev-skip-space nil
+ "Non-nil means tolerate trailing spaces in the abbreviation to expand."
+ :group hippie-expand
+ :type 'boolean)
+
+(defcustom he-dabbrev-as-symbol t
+ "Non-nil means expand as symbols, i.e. syntax `_' is considered a letter."
+ :group hippie-expand
+ :type 'boolean)
+
(defvar he-num -1)
(defvar he-string-beg (make-marker))
@@ -1012,12 +1022,6 @@ string). It returns t if a new expansion is found, nil otherwise."
(setq result nil))) ; ignore if bad prefix or already in table
result))
-(defvar he-dabbrev-skip-space ()
- "Non-NIL means tolerate trailing spaces in the abbreviation to expand.")
-
-(defvar he-dabbrev-as-symbol t
- "Non-NIL means expand as symbols, i.e. syntax '_' is considered a letter.")
-
(defun he-dabbrev-beg ()
(let ((op (point)))
(save-excursion