Re: nnrss-node-just-text: Wrong type argument: sequencep, 62

[Mark A. Hershberger]

> (with-temp-buffer
>   (insert "<rss><![CDATA[ding]]></rss>")
>   (xml-parse-region (point-min) (point-max)))
>  => ((rss nil "ding"))
>
> (with-temp-buffer
>   (insert "<rss> <![CDATA[ding]]> </rss>")
>   (xml-parse-region (point-min) (point-max)))
>  => ((rss nil " " 32 103 110 105 100))
>
> The latter case seems to have returned a mirrored string as
> characters:
>
> (concat '(32 103 110 105 100))
>  => " gnid"
>
> Is it the intended behavior?

No.

Patch (beware the line wraps):

--- xml.el      7 Oct 2004 18:13:43 -0000       1.39
+++ xml.el      1 Dec 2004 04:44:50 -0000
@@ -371,7 +371,9 @@
       (let ((pos (match-end 0)))
        (unless (search-forward "]]>" nil t)
 	  (error "XML: (Not Well Formed) CDATA section does not end anywhere 
in the document"))
-       (buffer-substring pos (match-beginning 0))))
+       (concat
+        (buffer-substring pos (match-beginning 0))
+        (xml-parse-string))))
      ;;  DTD for the document
      ((looking-at "<!DOCTYPE")
       (let ((dtd (xml-parse-dtd parse-ns)))

signature.asc
Description: OpenPGP digital signature