Actual error messages

[modbot-mtm.git] / stump / bin / processNoack.pl

diff --git a/stump/bin/processNoack.pl b/stump/bin/processNoack.pl
index 38c29fe63804433fe955356b51c9ad2b668cac68..33f3d047b35886d5be19b59d5c374cdc09f1d80e 100755 (executable)
--- a/stump/bin/processNoack.pl
+++ b/stump/bin/processNoack.pl
@@ -29,9 +29,9 @@ if( $From =~ m/([\w-\.]*)\@([\w-\.]+)/ ) {
 
 if( !&nameIsInList( $From, "noack.list" ) ) { # need to preapprove
   print STDERR "Adding $From to the noack list...\n";
-  open( NOACK, ">>$NoAckFile" );
-    print NOACK "$From\n";
-  close( NOACK );
+  open( NOACK, ">>$NoAckFile" ) or die $!;
+    print NOACK "$From\n" or die $!;
+  close( NOACK ) or die $!;
 } else {
   print STDERR "$From already is in noack list\n";
 }