Commit c97c655f authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen
Browse files

* xml.c (parse_string): Renamed to parse_string(), since that's

what it does.
(parse_string): Return nil when the document can't be parsed.
parent 5e2a84e3
2010-09-14 Lars Magne Ingebrigtsen <larsi@gnus.org>
* xml.c (parse_string): Renamed to parse_string(), since that's
what it does.
(parse_string): Return nil when the document can't be parsed.
2010-09-14 Jan Djärv <jan.h.d@swipnet.se>
* xterm.c (get_current_vm_state): New function.
......
......@@ -69,11 +69,11 @@ Lisp_Object make_dom (xmlNode *node)
}
static Lisp_Object
parse_buffer (Lisp_Object string, Lisp_Object base_url, int htmlp)
parse_string (Lisp_Object string, Lisp_Object base_url, int htmlp)
{
xmlDoc *doc;
xmlNode *node;
Lisp_Object result;
Lisp_Object result = Qnil;
int ibeg, iend;
char *burl = "";
......@@ -114,7 +114,7 @@ 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)
{
return parse_buffer (string, base_url, 1);
return parse_string (string, base_url, 1);
}
DEFUN ("xml-parse-string", Fxml_parse_string, Sxml_parse_string,
......@@ -124,7 +124,7 @@ 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)
{
return parse_buffer (string, base_url, 0);
return parse_string (string, base_url, 0);
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment