* shr.el (shr-dom-to-xml): Fixed function call.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 551d360..03c69d0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2013-06-16  Rüdiger Sonderfeld  <ruediger@c-plusplus.de>
 
+       * shr.el (shr-dom-to-xml): Fixed function call.
+
        * eww.el (eww): New group.
        (eww-header-line-format): New custom variable.
        (eww-current-title): New variable.

diff --git a/lisp/shr.el b/lisp/shr.el
index 7f79e1a..fae1742 100644 (file)
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -920,7 +920,7 @@ ones, in case fg and bg are nil."
     (dolist (sub (cdr dom))
       (cond
        ((listp (cdr sub))
-        (setq text (concat text (dom-to-text sub))))
+        (setq text (concat text (shr-dom-to-xml sub))))
        ((eq (car sub) 'text)
         (setq text (concat text (cdr sub))))
        (t