From 92563604909d8de1b56e756274fd04c04d45cf67 Mon Sep 17 00:00:00 2001 From: joey Date: Fri, 13 Oct 2006 18:31:18 +0000 Subject: * Make the aggregate plugin emphasize error messages. --- IkiWiki/Plugin/aggregate.pm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'IkiWiki') diff --git a/IkiWiki/Plugin/aggregate.pm b/IkiWiki/Plugin/aggregate.pm index ac55dcb1d..2e1ab66e6 100644 --- a/IkiWiki/Plugin/aggregate.pm +++ b/IkiWiki/Plugin/aggregate.pm @@ -83,6 +83,7 @@ sub preprocess (@) { #{{{ $feed->{numposts}=0 unless defined $feed->{numposts}; $feed->{newposts}=0 unless defined $feed->{newposts}; $feed->{message}="new feed" unless defined $feed->{message}; + $feed->{error}=0 unless defined $feed->{error}; $feed->{tags}=[]; while (@_) { my $key=shift; @@ -93,7 +94,9 @@ sub preprocess (@) { #{{{ } return "{url}."\">".$feed->{name}.": ". - "".$feed->{message}." (".$feed->{numposts}." posts". + ($feed->{error} ? "" : "").$feed->{message}. + ($feed->{error} ? "" : ""). + " (".$feed->{numposts}." posts". ($feed->{newposts} ? "; ".$feed->{newposts}." new" : ""). ")"; } # }}} @@ -199,6 +202,7 @@ sub aggregate () { #{{{ my @urls=XML::Feed->find_feeds($feed->{url}); if (! @urls) { $feed->{message}="could not find feed at ".$feed->{feedurl}; + $feed->{error}=1; debug($feed->{message}); next; } @@ -207,11 +211,13 @@ sub aggregate () { #{{{ my $f=eval{XML::Feed->parse(URI->new($feed->{feedurl}))}; if ($@) { $feed->{message}="feed crashed XML::Feed! $@"; + $feed->{error}=1; debug($feed->{message}); next; } if (! $f) { $feed->{message}=XML::Feed->errstr; + $feed->{error}=1; debug($feed->{message}); next; } @@ -229,6 +235,7 @@ sub aggregate () { #{{{ $feed->{message}="processed ok at ". displaytime($feed->{lastupdate}); + $feed->{error}=0; } # TODO: expiry -- cgit v1.2.3