/* Interface to libxml2.
- Copyright (C) 2010-2013 Free Software Foundation, Inc.
+ Copyright (C) 2010-2014 Free Software Foundation, Inc.
This file is part of GNU Emacs.
if (!(library = w32_delayed_load (Qlibxml2_dll)))
{
- message ("%s", "libxml2 library not found");
+ message1 ("libxml2 library not found");
return 0;
}
{
if (node->type == XML_ELEMENT_NODE)
{
- Lisp_Object result = Fcons (intern ((char *) node->name), Qnil);
+ Lisp_Object result = list1 (intern ((char *) node->name));
xmlNode *child;
xmlAttr *property;
Lisp_Object plist = Qnil;
void
syms_of_xml (void)
{
- defsubr (&Slibxml_parse_html_region);
- defsubr (&Slibxml_parse_xml_region);
+#include "xml.x"
DEFSYM (Qlibxml2_dll, "libxml2");
}