Bug 6086 follow-up Uppercase initial coding guideline fix

[koha_gimpoz] / C4 / Letters.pm

diff --git a/C4/Letters.pm b/C4/Letters.pm
index 5e3089b..28c6984 100644 (file)
--- a/C4/Letters.pm
+++ b/C4/Letters.pm
@@ -399,7 +399,7 @@ sub SendAlerts {
                 logaction( "ACQUISITION", "CLAIM ISSUE", undef, "To=" . $mail{To} . " Title=" . $innerletter->{title} . " Content=" . $innerletter->{content} ) if $type eq 'claimissues';
             }
         } else {
-            die "This bookseller has no email\n";
+            return {error => "no_email" };
         }
 
         warn "sending to From $userenv->{emailaddress} subj $innerletter->{title} Mess $innerletter->{content}" if $debug;