From f42d49b2939ab6983271a7ecdcf16a996f6ebeac Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Thu, 28 Jan 2021 00:16:49 -0700
Subject: gmi2email: handle failures to fetch images

Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
---
 gmi2email | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

(limited to 'gmi2email')

diff --git a/gmi2email b/gmi2email
index d3e0ed5..ef38426 100755
--- a/gmi2email
+++ b/gmi2email
@@ -292,13 +292,21 @@ sub gemtext_to_mail {
         } elsif ($opts{inline_images}
             and my ($uri) = m{^=>\s*(gemini://\S+\.(?:jpg|jpeg|png|gif))}) {
             &$flush;
-            my ($type, $data) = gemini_fetch($uri);
+            my ($type, $data, $failed);
+	    #<<<
+            try {
+                ($type, $data) = gemini_fetch($uri);
+            } catch {
+		push @buffer, "when fetching $uri, $_";
+		$failed = 1;
+            };
+	    #>>>
             $msg->attach(
                 Type        => $type,
                 Data        => $data,
                 Filename    => (split "/", $uri)[-1],
                 Disposition => "inline"
-            );
+            ) unless $failed;
         } elsif (/^=>/) {
             &$pad unless @buffer and $buffer[$#buffer] =~ /^=>/;
             push @buffer, $_;
-- 
cgit v1.2.3