Original release 20160919

[fex.git] / cgi-bin / fup

diff --git a/cgi-bin/fup b/cgi-bin/fup
index 2a799acd3293d2d2cf7768dbfdc2762ae4664f04..9ba0ef27ecc8118654520e4072b6ff655778f9bd 100755 (executable)
--- a/cgi-bin/fup
+++ b/cgi-bin/fup
@@ -1613,7 +1613,10 @@ sub parse_request {
 
     &check_space($cl) if $cl > 0;
 
-    $SIG{ALRM} = sub { die "TIMEOUT\n" };
+    $SIG{ALRM} = sub {
+      $SIG{__DIE__} = 'DEFAULT';
+      die "TIMEOUT\n";
+    };
     alarm($timeout);
     binmode(STDIN,':raw');
 
@@ -1942,7 +1945,10 @@ sub showstatus {
     exit;
   }
 
-  $SIG{ALRM} = sub { die "TIMEOUT in showstatus: no (more) data received\n" };
+  $SIG{ALRM} = sub {
+    $SIG{__DIE__} = 'DEFAULT';
+    die "TIMEOUT in showstatus: no (more) data received\n";
+  };
   alarm($timeout*2);
 
   $t0 = $t1 = time;