From: Dobrica Pavlinusic Date: Sat, 12 Dec 2009 17:05:11 +0000 (+0100) Subject: include style in each rss entry X-Git-Url: http://git.rot13.org/?p=HTML5TV.git;a=commitdiff_plain;h=a36505a210da64cacc3c43ef63fa7d9b0077f647;hp=3385ed56f028f14053a810317a19a6cccc57b3b3 include style in each rss entry --- diff --git a/bin/calendar.pl b/bin/calendar.pl index 3a5a100..71ab065 100755 --- a/bin/calendar.pl +++ b/bin/calendar.pl @@ -7,9 +7,24 @@ use lib 'lib'; use HTML5TV::hCalendar; use File::Slurp; use XML::FeedPP; +use HTML::ResolveLink; my $url = 'http://html5tv.rot13.org'; +my $style = qq| + +|; + my $html = qq| @@ -26,13 +41,8 @@ my $html = qq| - +$style HTML5TV all media available @@ -49,6 +59,8 @@ my $feed = XML::FeedPP::RSS->new; $feed->title( 'HTML5TV' ); $feed->link( $url ); +my $resolver = HTML::ResolveLink->new( base => $url ); + foreach my $path ( glob 'media/*/hCalendar.html' ) { next if $path =~ m{_editing}; warn "+ $path\n"; @@ -78,7 +90,7 @@ foreach my $path ( glob 'media/*/hCalendar.html' ) { my $item = $feed->add_item( "$url/$media.html" ); $item->title( $hcal->summary ); $item->pubDate( $pubDate ); - $item->description( $html ); + $item->description( $style . $resolver->resolve( $html ) ); } $feed->to_file( 'www/calendar.xml' );