diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-01-25 19:39:58 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-01-25 19:39:58 -0700 |
commit | 3872d4850ca9ade0eccc8c7054b6459a1d00b25f (patch) | |
tree | 6978e081f8b1129c501e410c859df1a4804f5cec | |
parent | 77740f4625825f605258fa706069efff52b511d9 (diff) | |
download | mailscripts-3872d4850ca9ade0eccc8c7054b6459a1d00b25f.tar.gz |
gmi2email: don't record as seen if sending mail threw an exception
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-rwxr-xr-x | gmi2email | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -158,18 +158,17 @@ sub send_subscribed_gemtext { } }; #>>> - $dbh->do("INSERT INTO seen VALUES (\"$uri\")"); - $mail and !$no_mail or return; if ($type =~ m{^text/gemini}) { gemtext_to_mail( $data, %to_mail_opts, gemlog => $gemlog // "unknown gemlog", link_title => $link_title, date => email_date $feed_date - )->send; + )->send if $mail and !$no_mail; } else { warn "$uri is not gemtext"; } + $dbh->do("INSERT INTO seen VALUES (\"$uri\")"); } sub gemini_fetch { |