From a2964053573a757212e5a884475ee654a886bc15 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sat, 5 Aug 1995 20:21:06 +0000
Subject: [PATCH] (tab-to-tab-stop): Expand abbrevs only after a word-char.

---
 lisp/indent.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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