From ab1da975f6499985e773e5f71139087ff3b6633f Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 8 Apr 2021 22:57:24 -0700 Subject: gmi2email: change order of conditional branches No functional change. Signed-off-by: Sean Whitton --- gmi2email | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) (limited to 'gmi2email') diff --git a/gmi2email b/gmi2email index 31bc347..0a65504 100755 --- a/gmi2email +++ b/gmi2email @@ -121,17 +121,7 @@ foreach my $sub (<$subs_fh>) { }; #>>> next if $next; - if ($type =~ m{^text/gemini}) { - for (@$data) { - if (/^#\s*/ and not $gemlog) { - $gemlog = $'; - } elsif (my ($uri, $y, $m, $d, $title) - = /^=>\s*(\S+)\s+([0-9]{4})-([0-9]{2})-([0-9]{2})[\s-]*(.*)/) { - send_subscribed_gemtext($uri, $gemlog // "unknown gemlog", - $title, timelocal 0, 0, 12, $d, $m - 1, $y); - } - } - } elsif ($type =~ m{^(?:text|application)/(?:(?:atom|rss)\+)?xml}) { + if ($type =~ m{^(?:text|application)/(?:(?:atom|rss)\+)?xml}) { my $feed = XML::Feed->parse(\$data); for ($feed->entries) { my $date = $_->issued // $_->modified; @@ -148,6 +138,16 @@ foreach my $sub (<$subs_fh>) { send_subscribed_gemtext($link, $feed->title, $_->title, $date); } + } elsif ($type =~ m{^text/gemini}) { + for (@$data) { + if (/^#\s*/ and not $gemlog) { + $gemlog = $'; + } elsif (my ($uri, $y, $m, $d, $title) + = /^=>\s*(\S+)\s+([0-9]{4})-([0-9]{2})-([0-9]{2})[\s-]*(.*)/) { + send_subscribed_gemtext($uri, $gemlog // "unknown gemlog", + $title, timelocal 0, 0, 12, $d, $m - 1, $y); + } + } } else { die "$sub is not gemtext nor an Atom feed, so far as I can tell"; } -- cgit v1.2.3