check if img tag has actually a 'src' attribute

otherwise the journal gets flooded with

  Use of uninitialized value in pattern match (m//) [...]

when the user opens a preview which contains img tags without src attribute

Signed-off-by: Dominik Csapak <d.csapak@proxmox.com>

diff --git a/src/PMG/HTMLMail.pm b/src/PMG/HTMLMail.pm
index 668be48c223ee13244c184f304c7ed25138b8def..b69a59642b8668c85657842ac3c8901d691127d4 100644 (file)
--- a/src/PMG/HTMLMail.pm
+++ b/src/PMG/HTMLMail.pm
@@ -32,7 +32,7 @@ sub dump_html {
                $node->{target} = '_blank' if $tag eq 'a';
 
                if ($tag eq 'img') {
-                   if ($node->{src} =~ m/^cid:(\S+)$/) {
+                   if ($node->{src} && $node->{src} =~ m/^cid:(\S+)$/) {
                        if (my $datauri = $cid_hash->{$1}) {
                            $node->{src} = $datauri;
                        }