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
commit86b79fbcbf878ab0f0e815ce34991304453538b9 (patch)
tree9c54888c791fe4cf9d3bb0d44a350d14d9b65663 /lisp/hippie-exp.el
parent0427eb81e6e6c10cc260392c9e48b6f04b0df759 (diff)
downloademacs-86b79fbcbf878ab0f0e815ce34991304453538b9.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