diff lisp/textmodes/sgml-mode.el @ 87684:9349c39d2ae0

* testmodes/sgml-mode.el (sgml-tag-syntax-table): Initialize this constant with a computation on sgml-specials rather than a literal list. Without this change the syntax table is generated incorrectly, and the mode will think it's in a comment following any instance of the string "--".
author Eric S. Raymond <esr@snark.thyrsus.com>
date Wed, 09 Jan 2008 16:21:29 +0000
parents 4c3c683cdff8
children c70e45a7acfd
line wrap: on
line diff
--- a/lisp/textmodes/sgml-mode.el	Wed Jan 09 12:48:42 2008 +0000
+++ b/lisp/textmodes/sgml-mode.el	Wed Jan 09 16:21:29 2008 +0000
@@ -159,7 +159,7 @@
   "Syntax table used in SGML mode.  See also `sgml-specials'.")
 
 (defconst sgml-tag-syntax-table
-  (let ((table (sgml-make-syntax-table '(?- ?\" ?\'))))
+  (let ((table (sgml-make-syntax-table sgml-specials)))
     (dolist (char '(?\( ?\) ?\{ ?\} ?\[ ?\] ?$ ?% ?& ?* ?+ ?/))
       (modify-syntax-entry char "." table))
     table)