mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/net/newst-backend.el (newsticker--sentinel-work):

Browse source 
Replace obsolete form of libxml-parse-xml-region.
This commit is contained in:
Glenn Morris 2018-04-20 13:46:45 -04:00
parent 3e233dd1c9
commit be96414a62
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/net/newst-backend.el
View file

@ -874,11 +874,12 @@ Argument BUFFER is the buffer of the retrieval process."
(decode-coding-region (point-min) (point-max)
coding-system))
(condition-case errordata
;; The xml parser might fail or the xml might be
;; bugged
;; The xml parser might fail or the xml might be bugged.
(if (fboundp 'libxml-parse-xml-region)
(list (libxml-parse-xml-region (point-min) (point-max)
nil t))
(progn
(xml-remove-comments (point-min) (point-max))
(list (libxml-parse-xml-region (point-min) (point-max)
nil)))
(xml-parse-region (point-min) (point-max)))
(error (message "Could not parse %s: %s"
(buffer-name) (cadr errordata))