procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/textmodes/sgml-mode.el (sgml-syntax-propertize-function):

Browse source 
Return valid syntax-table property value when converting
quotes within text from string syntax to punctuation syntax.

Fixes: debbugs:13844
This commit is contained in:
Dale Sedivec 2013-02-28 22:43:57 -05:00 • committed by Stefan Monnier
parent 9d232fc451
commit 4a83d19e56
2 changed files with 9 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2013-02-28 Dale Sedivec <dale@codefu.org>
* textmodes/sgml-mode.el (sgml-syntax-propertize-function):
Return valid syntax-table property value when converting
quotes within text from string syntax to punctuation syntax (bug#13844).
2013-02-28 Juri Linkov <juri@jurta.org>
* dired-aux.el (dired-diff): If file at point is a backup file,

6
lisp/textmodes/sgml-mode.el
View file

@ -312,8 +312,8 @@ Any terminating `>' or `/' is not matched.")
(defconst sgml-syntax-propertize-function
(syntax-propertize-rules
;; Use the `b' style of comments to avoid interference with the -- ... --
;; comments recognized when `sgml-specials' includes ?-.
;; Use the `b' style of comments to avoid interference with the -- ... --
;; comments recognized when `sgml-specials' includes ?-.
;; FIXME: beware of <!--> blabla <!--> !!
("\\(<\\)!--" (1 "< b"))
("--[ \t\n]*\\(>\\)" (1 "> b"))
@ -322,7 +322,7 @@ Any terminating `>' or `/' is not matched.")
;; going to change, so as not to need to flush the data we just computed.
("\"" (0 (if (prog1 (zerop (car (syntax-ppss (match-beginning 0))))
(goto-char (match-end 0)))
"."))))
(string-to-syntax ".")))))
"Syntactic keywords for `sgml-mode'.")
;; internal