* 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:
@@ -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.
|
||||
|
||||
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user