# HG changeset patch
# User Markus Rost <rost@math.uni-bielefeld.de>
# Date 1032639047 0
# Node ID 29a49406ad9d8351ab6006ac1c2a363b49776e46
# Parent  c8b21779719649b88cb8fccda3fa63a5704fdd49
(mail-abbrev-make-syntax-table):  Give %!._- word constituent syntax.

diff -r c8b217797196 -r 29a49406ad9d lisp/mail/mailabbrev.el
--- a/lisp/mail/mailabbrev.el	Sat Sep 21 20:00:30 2002 +0000
+++ b/lisp/mail/mailabbrev.el	Sat Sep 21 20:10:47 2002 +0000
@@ -420,6 +420,11 @@
 		       (set-char-table-range tab key w))))
        tab)
       (modify-syntax-entry ?@ "w" tab)
+      (modify-syntax-entry ?% "w" tab)
+      (modify-syntax-entry ?! "w" tab)
+      (modify-syntax-entry ?. "w" tab)
+      (modify-syntax-entry ?_ "w" tab)
+      (modify-syntax-entry ?- "w" tab)
       (setq mail-abbrev-syntax-table tab))))
 
 (defun mail-abbrev-in-expansion-header-p ()