Stefan
=== modified file 'lisp/nxml/nxml-mode.el'
--- lisp/nxml/nxml-mode.el 2014-03-21 06:56:55 +0000
+++ lisp/nxml/nxml-mode.el 2014-04-16 15:22:57 +0000
@@ -872,7 +872,7 @@
(defun nxml-fontify-matcher (bound)
"Called as font-lock keyword matcher."
-
+ (syntax-propertize bound)
(unless nxml-degraded
(nxml-debug-change "nxml-fontify-matcher" (point) bound)
=== modified file 'lisp/nxml/xmltok.el'
--- lisp/nxml/xmltok.el 2014-03-21 06:56:55 +0000
+++ lisp/nxml/xmltok.el 2014-04-16 15:05:55 +0000
@@ -750,7 +750,8 @@
;; Need do this after the goto-char because
;; marked error should just apply to <!--
(xmltok-add-error "First following `--' not followed by `>'")
- 'not-well-formed)))))
+ (goto-char (point-max))
+ 'comment)))))
(defun xmltok-scan-attributes ()
(let ((recovering nil)