[Emacs-diffs] /srv/bzr/emacs/trunk r105296: * xml.c (make_dom): Return comments, too.

[Lars Magne Ingebrigtsen]

------------------------------------------------------------
revno: 105296
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Wed 2011-07-20 21:58:46 +0200
message:
  * xml.c (make_dom): Return comments, too.
modified:
  src/ChangeLog
  src/xml.c

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2011-07-19 17:33:06 +0000
+++ b/src/ChangeLog     2011-07-20 19:58:46 +0000
@@ -1,3 +1,7 @@
+2011-07-20  Lars Magne Ingebrigtsen  <address@hidden>
+
+       * xml.c (make_dom): Return comments, too.
+
 2011-07-19  Paul Eggert  <address@hidden>
 
        Port to OpenBSD.

=== modified file 'src/xml.c'
--- a/src/xml.c 2011-04-08 16:15:30 +0000
+++ b/src/xml.c 2011-07-20 19:58:46 +0000
@@ -71,6 +71,14 @@
       else
        return Qnil;
     }
+  else if (node->type == XML_COMMENT_NODE)
+    {
+      if (node->content)
+       return list3 (intern ("comment"), Qnil,
+                     build_string ((char *) node->content));
+      else
+       return Qnil;
+    }
   else
     return Qnil;
 }