[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
(html-parse-string &optional LISP-OBJECT STRING LISP-OBJECT BASE-URL)
From: |
Leo |
Subject: |
(html-parse-string &optional LISP-OBJECT STRING LISP-OBJECT BASE-URL) |
Date: |
Tue, 14 Sep 2010 00:33:24 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.2 (Mac OS X 10.6.4) |
When I looked at the doc string of html-parse-string, it includes
LISP-OBJECT. Looks like the following trivial patch is needed.
diff --git a/src/xml.c b/src/xml.c
index c1098b1..1087e50 100644
--- a/src/xml.c
+++ b/src/xml.c
@@ -112,7 +112,8 @@ DEFUN ("html-parse-string", Fhtml_parse_string,
Shtml_parse_string,
doc: /* Parse the string as an HTML document and return the parse tree.
If BASE-URL is non-nil, it will be used to expand relative URLs in
the HTML document.*/)
- (Lisp_Object string, Lisp_Object base_url)
+ (string, base_url)
+ Lisp_Object string, base_url;
{
return parse_buffer (string, base_url, 1);
}
@@ -122,7 +123,8 @@ DEFUN ("xml-parse-string", Fxml_parse_string,
Sxml_parse_string,
doc: /* Parse the string as an XML document and return the parse tree.
If BASE-URL is non-nil, it will be used to expand relative URLs in
the XML document.*/)
- (Lisp_Object string, Lisp_Object base_url)
+ (string, base_url)
+ Lisp_Object string, base_url;
{
return parse_buffer (string, base_url, 0);
}
Leo
- (html-parse-string &optional LISP-OBJECT STRING LISP-OBJECT BASE-URL),
Leo <=