X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FCommon.pm;fp=Debbugs%2FCommon.pm;h=276cbd0fdfc46217a262055f363db6d4d1af6c5c;hb=3b5bc47c994cb2523dba6617d5e05156f6c2ff27;hp=9305d3f161e27bf410394b3412d385b9c9fb617d;hpb=a844a562081aab9ae8489c293d2f38026b6e87b1;p=debbugs.git

diff --git a/Debbugs/Common.pm b/Debbugs/Common.pm
index 9305d3f..276cbd0 100644
--- a/Debbugs/Common.pm
+++ b/Debbugs/Common.pm
@@ -431,7 +431,7 @@ sub __add_to_hash {
     }
     $type //= 'address';
     my $fh = IO::File->new($fn,'r') or
-	die "Unable to open $fn for reading: $!";
+	croak "Unable to open $fn for reading: $!";
     binmode($fh,':encoding(UTF-8)');
     while (<$fh>) {
 	chomp;