Bugfixes for permissions

diff --git a/stump/bin/submission.pl b/stump/bin/submission.pl
index f978a1fb36d526a1f3b2672611a45bf5646ebf6a..fe02ca8e36a25d584686aa2d6d22b93243640a5f 100755 (executable)
--- a/stump/bin/submission.pl
+++ b/stump/bin/submission.pl
@@ -405,13 +405,12 @@ print STDERR "command = $command\n";
 open IWJL, ">>/home/webstump/t.log";
 print IWJL "=========== SUBMISSION MAIN\n";
 
-open( COMMAND, "| $command" );
+open( COMMAND, "| $command" ) or die $!;
 open( TMPFILE, "$TmpFile" ) || die "cant open tmpfile";
 
   $IsBody = 0;
 
   while( <TMPFILE> ) {
-print IWJL "SbRt $_\n";
 
     if( $BadNewsserver && !(/^$/) ) {
       next;
@@ -452,8 +451,8 @@ print IWJL "SbRt $_\n";
     }
   }
 
-close( TMPFILE );
-close( COMMAND );
+close( TMPFILE ) or die $!;
+close( COMMAND ) or die $!;
 
 ################################################################## Archiving
 # archive

diff --git a/stump/bin/suspicious.pl b/stump/bin/suspicious.pl
index 11bde7b5a556bd9f08df5f272cc6222a86f8d425..38b94f8df5d567a4fc0d0cd6999189487f5841fd 100755 (executable)
--- a/stump/bin/suspicious.pl
+++ b/stump/bin/suspicious.pl
@@ -171,9 +171,9 @@ print COMMAND $Body;
 close( COMMAND );
 
 if( $needAck eq "yes" ) {
-  open( ACK, "| modack.received" );
+  open( ACK, "| modack.received" ) or die $!;
   print ACK $Body;
-  close( ACK );
+  close( ACK ) or die $!;
 }
 
 1;

diff --git a/stump/etc/modack.approved.IN1 b/stump/etc/modack.approved.INO
old mode 100644 (file)
new mode 100755 (executable)
similarity index 100%
rename from stump/etc/modack.approved.IN1
rename to stump/etc/modack.approved.INO

diff --git a/stump/etc/modack.received.IN1 b/stump/etc/modack.received.INO
old mode 100644 (file)
new mode 100755 (executable)
similarity index 100%
rename from stump/etc/modack.received.IN1
rename to stump/etc/modack.received.INO