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

Keep nxml-prolog-end up to date (Bug#18871)

Browse source 
The change on 2016-01-16 "lisp/nxml: Use syntax-tables for comments"
removed the update of nxml-prolog-end, although it already failed to
work correctly after 2013-10-07 "* lisp/nxml/nxml-mode.el: Use
lexical-binding and syntax-propertize."
* lisp/nxml/nxml-rap.el: New function.
* lisp/nxml/nxml-mode.el (nxml-mode): Add it to
after-change-functions.
This commit is contained in:
Noam Postavsky 2019-05-18 14:54:36 -04:00
parent d414c93b06
commit 3f2bfe9a19
2 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
lisp/nxml/nxml-mode.el
View file

@ -544,6 +544,7 @@ Many aspects this mode can be customized using
(setq-local syntax-ppss-table sgml-tag-syntax-table)
(setq-local syntax-propertize-function #'nxml-syntax-propertize)
(add-hook 'change-major-mode-hook #'nxml-cleanup nil t)
(add-hook 'after-change-functions #'nxml-maybe-rescan-prolog nil t)
;; Emacs 23 handles the encoding attribute on the xml declaration
;; transparently to nxml-mode, so there is no longer a need for the below

6
lisp/nxml/nxml-rap.el
View file

@ -108,6 +108,12 @@ Return nil if the character at POS is not inside."
(setq nxml-prolog-regions (xmltok-forward-prolog))
(setq nxml-prolog-end (point))))
(defun nxml-maybe-rescan-prolog (start _end _length)
"Reparse the prolog if START lies within it.
`nxml-mode' adds this function on `after-change-functions'."
(when (<= start nxml-prolog-end)
(save-excursion
(nxml-scan-prolog))))
;;; Random access parsing