procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(tab-to-tab-stop): Expand abbrevs only after a word-char.

Browse source
This commit is contained in:
Richard M. Stallman 1995-08-05 20:21:06 +00:00
parent d0776f5c89
commit a296405357
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/indent.el
View file

@ -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)))