commit c200079891e3277da48e952a1c7decd219c8aa6d
parent 01d0eb250880b32d366fbfa861c1e452094f6a0a
Author: René Wagner <rwagner@rw-net.de>
Date: Fri, 27 Nov 2020 20:33:16 +0100
more rendering adjustments
Diffstat:
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/orrg.pl b/orrg.pl
@@ -74,13 +74,13 @@ sub create_response
my $hs = HTML::Strip->new(emit_spaces => 0, auto_reset => 1);
foreach my $it ($feed->get_item()) {
- push @body, $it->description ne '' ? '### '. $it->title : $it->title;
+ push @body, ($it->description ne '' || $it->pubDate ne '')? '### '. $it->title : $it->title;
if ($it->pubDate ne '') {
my $dt = DateTime::Format::ISO8601->parse_datetime($it->pubDate);
push @body, 'published '. strftime('%Y-%m-%dT%H:%M:%SZ', gmtime($dt->epoch));
+ push @body, '';
}
if ($it->description ne '') {
- push @body, '';
my $desc = $it->description;
chomp $desc;
$desc =~ s/\<li\>/* /ig;