* 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 "--".
This commit is contained in:
Eric S. Raymond 2008-01-09 16:21:29 +00:00
parent 6870e77530
commit 6e69aa4d01
2 changed files with 9 additions and 1 deletions

View file

@ -1,3 +1,11 @@
2008-01-09 Eric S. Raymond <esr@snark.thyrsus.com>
* 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 "--".
2008-01-09 Tassilo Horn <tassilo@member.fsf.org>
* doc-view.el (doc-view-mode-p): Add EPS as supported type.

View file

@ -159,7 +159,7 @@ This takes effect when first loading the `sgml-mode' library.")
"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)