summaryrefslogtreecommitdiff
path: root/lisp/xml.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/xml.el')
-rw-r--r--lisp/xml.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/xml.el b/lisp/xml.el
index 408c13ab39b..98241750c73 100644
--- a/lisp/xml.el
+++ b/lisp/xml.el
@@ -325,10 +325,8 @@ Returns one of:
(push (cons (cdar attr) (intern (concat ":" (cdr attr))))
xml-ns))))
- ;; expand element names
- (setq node-name (list (xml-maybe-do-ns node-name "" xml-ns)))
+ (setq children (list attrs (xml-maybe-do-ns node-name "" xml-ns)))
- (setq children (list attrs node-name))
;; is this an empty element ?
(if (looking-at "/>")
(progn