diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-08-05 20:21:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-08-05 20:21:06 +0000 |
| commit | 722fa354450d694ccb3092db93c691f4128d7b55 (patch) | |
| tree | 7a6bd2ffb1716cb1ad486035f25cbd2889b7aeec /lisp | |
| parent | 72e092912cb45c3ac7edbe95dd432cfeb2e656be (diff) | |
| download | emacs-722fa354450d694ccb3092db93c691f4128d7b55.tar.gz | |
(tab-to-tab-stop): Expand abbrevs only after a word-char.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/indent.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/indent.el b/lisp/indent.el index 9aaaf299423..dd2f95771bf 100644 --- a/lisp/indent.el +++ b/lisp/indent.el @@ -419,7 +419,8 @@ You can add or remove colons and then do \\<edit-tab-stops-map>\\[edit-tab-stops The variable `tab-stop-list' is a list of columns at which there are tab stops. Use \\[edit-tab-stops] to edit them interactively." (interactive) - (if abbrev-mode (expand-abbrev)) + (and abbrev-mode (= (char-syntax (preceding-char)) ?w) + (expand-abbrev)) (let ((tabs tab-stop-list)) (while (and tabs (>= (current-column) (car tabs))) (setq tabs (cdr tabs))) |