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

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

[Katsumi Yamaoka]

Hello,

In the bugs@gnus.org list, I found a bug report which is
attached below.  I don't know which of xml.el and nnrss.el is
wrong, but I found a strange behavior of xml.el.

(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?

The problem Andrew M. Scott reported is not the same but similar
to this.  The same behavior that xml-parse-region returns a
mirrored character sequence can be reproduced as follows:

cd /tmp
wget 'http://www.lockergnome.com/rss/news.php'

(with-temp-buffer
  (insert-file-contents "/tmp/news.php")
  (xml-parse-region (point-min) (point-max)))

Regards,

>>>>> In <gfbvfbonqhs.fsf@chlr4917.ch.intel.com> Andrew M. Scott wrote:

> I encountered an nnrss-node-just-text: Wrong type argument: sequencep, 62
> error in the 11/29/2004 CVS version of gnus, which precedes the
> Emacs-21.3.50 (11/29/2004) gnus in my load-path.

> Invocating a fresh emacs, then hitting M-x gnus, produced
> the following *Messages* and *Backtrace*

> Could nnrss be enhanced not to abort on this kind of error?

> My temporary workaround was to execute (gnus-no-server-1 1) and then
> "U" the offending group, save from the GNUS summary buffer, quit GNUS,
> and then restart via M-x gnus.

> No Gnus v0.3
> GNU Emacs 21.3.50.1 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
>  of 2004-11-29 on chlr4918
> 200 news01.intel.com InterNetNews NNRP server INN 2.3.3 ready (posting ok).

> *Messages*
> Opening nnrss server...done
> Opening nnrss server on syndic8.com...
> Loading /eng/eng10/ascott/News/rss/nnrss-syndic8.com.el (source)...done
> Opening nnrss server on syndic8.com...done
> Opening nnrss server...
> Loading /eng/eng10/ascott/News/rss/nnrss.el (source)...done
> Opening nnrss server...done
> nnrss-node-just-text: Wrong type argument: sequencep, 62

> *Backtrace*
> Debugger entered--Lisp error: (wrong-type-argument sequencep 62)
>   mapconcat(nnrss-node-just-text (62 112 47 60 62 97 47 60 39 101 108 98 111 78 32 100 110 97 32 115 101 110 114 97 66 32 110 105 32 105 70 45 105 87 39 32 114 111 102 32 115 107 110 105 76 32 100 101 116 97 ...) " ")
>   nnrss-node-just-text((description nil 62 112 47 60 62 97 47 60 39 101 108 98 111 78 32 100 110 97 32 115 101 110 114 97 66 32 110 105 32 105 70 45 105 87 39 32 114 111 102 32 115 107 110 105 76 32 100 101 ...))
>   nnrss-node-text(nil description (item nil "\n			" (title nil "Wi-Fi in Barnes and Noble") "\n			" (description nil 62 112 47 60 62 97 47 60 39 101 108 98 111 78 32 100 110 97 32 115 101 110 114 97 66 32 110 105 32 105 70 45 105 87 39 32 114 111 102 32 115 107 110 105 76 32 100 101 ...) "\n               " (author nil "rss_feedback@lockergnome.com (Meryl Evans)") "\n			" (category nil "Wi-Fi") "\n			" (pubDate nil "Mon, 29 Nov 2004 11:32:42 -0800") "\n			" (link nil "http://channels.lockergnome.com/news/archives/20041129_wifi_in_barnes_and_noble.phtml") "\n			" (guid nil "http://channels.lockergnome.com/news/archives/20041129_wifi_in_barnes_and_noble.phtml") "\n			\n		"))
>   nnrss-check-group("Lockergnome's Technology News" "")
>   nnrss-request-group("Lockergnome's Technology News" "" nil)
>   gnus-activate-group("nnrss:Lockergnome's Technology News" scan)
>   gnus-get-unread-articles(nil)
>   gnus-setup-news(nil nil nil)
>   byte-code("\b

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

[Mark A. Hershberger]

[-- Attachment #1.1: Type: text/plain, Size: 563 bytes --]

Katsumi Yamaoka <yamaoka@jpl.org> writes:

> (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.

I'll look into this.


-- 
A choice between one man and a shovel, or a dozen men with teaspoons
is clear to me, and I'm sure it is clear to you also.
    -- Zimran Ahmed <http://www.winterspeak.com/>

[-- Attachment #1.2: Type: application/pgp-signature, Size: 188 bytes --]

[-- Attachment #2: Type: text/plain, Size: 142 bytes --]

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

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

[Mark A. Hershberger]

[-- Attachment #1.1: Type: text/plain, Size: 1001 bytes --]

> (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)))



[-- Attachment #1.2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 256 bytes --]

[-- Attachment #2: Type: text/plain, Size: 142 bytes --]

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

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

[Katsumi Yamaoka]

>>>>> In <41AD4D02.2060008@layover.com> Mark A. Hershberger wrote:

> Patch (beware the line wraps):

Thanks!  It works fine with the test and also nnrss.  I'm not
quite familiar with nnrss, though.