Mercurial > emacs
changeset 18038:1a3d130e356b
(he-dabbrev-skip-space, he-dabbrev-as-symbol):
Move definitions up. Use defcustom.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 30 May 1997 05:30:58 +0000 |
| parents | 354ae98947b5 |
| children | 0696d4c9aa15 |
| files | lisp/hippie-exp.el |
| diffstat | 1 files changed, 10 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hippie-exp.el Fri May 30 05:15:48 1997 +0000 +++ b/lisp/hippie-exp.el Fri May 30 05:30:58 1997 +0000 @@ -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 @@ (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