aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2018-04-14 19:06:51 +0200
committerLars Ingebrigtsen2018-04-14 19:06:51 +0200
commit369cb30d8cc9b2c1eee8ed21cca89e0277f8d61d (patch)
tree9cc1899526409407fa167b03d266ead2cd7f818c
parent0b0d3815da99f575b74e82234bfb963d89362152 (diff)
downloademacs-369cb30d8cc9b2c1eee8ed21cca89e0277f8d61d.tar.gz
emacs-369cb30d8cc9b2c1eee8ed21cca89e0277f8d61d.zip
(libxml-parse-html-region): Make DISCARD-COMMENTS obsolete
* lisp/subr.el (libxml-parse-xml-region) (libxml-parse-html-region): Make DISCARD-COMMENTS obsolete. * src/xml.c (Flibxml_parse_html_region) (Flibxml_parse_xml_region): Don't mention DISCARD-COMMENTS, since it's now no longer part of the advertised signature (bug#27178).
-rw-r--r--lisp/subr.el2
-rw-r--r--src/xml.c14
2 files changed, 6 insertions, 10 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 98724e9413e..9cf7d596cd9 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1456,6 +1456,8 @@ be a list of the form returned by `event-start' and `event-end'."
1456(set-advertised-calling-convention 'unintern '(name obarray) "23.3") 1456(set-advertised-calling-convention 'unintern '(name obarray) "23.3")
1457(set-advertised-calling-convention 'indirect-function '(object) "25.1") 1457(set-advertised-calling-convention 'indirect-function '(object) "25.1")
1458(set-advertised-calling-convention 'redirect-frame-focus '(frame focus-frame) "24.3") 1458(set-advertised-calling-convention 'redirect-frame-focus '(frame focus-frame) "24.3")
1459(set-advertised-calling-convention 'libxml-parse-xml-region '(start end base-url) "27.1")
1460(set-advertised-calling-convention 'libxml-parse-html-region '(start end base-url) "27.1")
1459 1461
1460;;;; Obsolescence declarations for variables, and aliases. 1462;;;; Obsolescence declarations for variables, and aliases.
1461 1463
diff --git a/src/xml.c b/src/xml.c
index fa88040597d..3674e320ef6 100644
--- a/src/xml.c
+++ b/src/xml.c
@@ -272,11 +272,8 @@ DEFUN ("libxml-parse-html-region", Flibxml_parse_html_region,
272 doc: /* Parse the region as an HTML document and return the parse tree. 272 doc: /* Parse the region as an HTML document and return the parse tree.
273If BASE-URL is non-nil, it is used to expand relative URLs. 273If BASE-URL is non-nil, it is used to expand relative URLs.
274 274
275If DISCARD-COMMENTS is non-nil, the top-level HTML comment is discarded. 275If you want comments to be stripped, use the `xml-remove-comments'
276 276function to strip comments before calling this function. */)
277This parameter is obsolete as of 27.1, and you should use the
278`xml-remove-comments' function to strip comments before calling
279this function if you don't want comments. */)
280 (Lisp_Object start, Lisp_Object end, Lisp_Object base_url, Lisp_Object discard_comments) 277 (Lisp_Object start, Lisp_Object end, Lisp_Object base_url, Lisp_Object discard_comments)
281{ 278{
282 if (init_libxml2_functions ()) 279 if (init_libxml2_functions ())
@@ -290,11 +287,8 @@ DEFUN ("libxml-parse-xml-region", Flibxml_parse_xml_region,
290 doc: /* Parse the region as an XML document and return the parse tree. 287 doc: /* Parse the region as an XML document and return the parse tree.
291If BASE-URL is non-nil, it is used to expand relative URLs. 288If BASE-URL is non-nil, it is used to expand relative URLs.
292 289
293If DISCARD-COMMENTS is non-nil, the top-level XML comment is discarded. 290If you want comments to be stripped, use the `xml-remove-comments'
294 291function to strip comments before calling this function. */)
295This parameter is obsolete as of 27.1, and you should use the
296`xml-remove-comments' function to strip comments before calling
297this function if you don't want comments. */)
298 (Lisp_Object start, Lisp_Object end, Lisp_Object base_url, Lisp_Object discard_comments) 292 (Lisp_Object start, Lisp_Object end, Lisp_Object base_url, Lisp_Object discard_comments)
299{ 293{
300 if (init_libxml2_functions ()) 294 if (init_libxml2_functions ())