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 | a2964053573a757212e5a884475ee654a886bc15 (patch) | |
| tree | 2269c3e3b174c389b21649661be4cceb0acfd4e2 /lisp/indent.el | |
| parent | d0776f5c896d161ad5fa5c115b4fb37cf98c7f27 (diff) | |
| download | emacs-a2964053573a757212e5a884475ee654a886bc15.tar.gz | |
(tab-to-tab-stop): Expand abbrevs only after a word-char.
Diffstat (limited to 'lisp/indent.el')
| -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))) |