otsune's SnakeOil RSSフィード

python -c "print''.join([chr(x) for x in 111&1101,110+~-~11,10^11*11,110+~-~11,-~101,-~11^11*11,~-110,111&11*11,11+11+10,11|~-0110,1-~11^11*11,10^11*11,-~11^11*11,110,101])"

2008-06-19

XML::RSS::LibXMLを使うtestがこけてたので調べてdiff書いた

| XML::RSS::LibXMLを使うtestがこけてたので調べてdiff書いた - otsune's SnakeOil  を含むブックマーク はてなブックマーク - XML::RSS::LibXMLを使うtestがこけてたので調べてdiff書いた - otsune's SnakeOil  XML::RSS::LibXMLを使うtestがこけてたので調べてdiff書いた - otsune's SnakeOil  のブックマークコメント

具体的には

prove -Ilib -vl t/plugins/CustomFeed-Script/base.t

がこけてた。

んでコンストラクタにversion渡せばいいんじゃネェかと思って書いた。

=== t/samples/scraper-args.pl
==================================================================
--- t/samples/scraper-args.pl	(revision 18524)
+++ t/samples/scraper-args.pl	(local)
@@ -5,7 +5,7 @@
 
 my($title, $desc) = @ARGV;
 
-my $rss = XML::RSS::LibXML->new;
+my $rss = XML::RSS::LibXML->new(version => '1.0');
 $rss->channel(title => $title, link => "http://example.com/", description => $desc);
 print $rss->as_string;
 
=== t/samples/scraper.pl
==================================================================
--- t/samples/scraper.pl	(revision 18524)
+++ t/samples/scraper.pl	(local)
@@ -3,7 +3,7 @@
 use warnings;
 use XML::RSS::LibXML;
 
-my $rss = XML::RSS::LibXML->new;
+my $rss = XML::RSS::LibXML->new(version => '1.0');
 $rss->channel(title => "Foo Bar", link => "http://example.com/");
 $rss->add_item(
     title => "Entry 1",
トラックバック - http://subtech.g.hatena.ne.jp/otsune/20080619