summaryrefslogtreecommitdiff
path: root/lisp/hippie-exp.el
diff options
context:
space:
mode:
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