Original release 20150826

[fex.git] / cgi-bin / foc

diff --git a/cgi-bin/foc b/cgi-bin/foc
index f384784b9be5c2f5c71c111cde5659daef265a5a..daf83f3b3039778fdd6adc6fb7ed1222283d39c8 100755 (executable)
--- a/cgi-bin/foc
+++ b/cgi-bin/foc
@@ -24,7 +24,7 @@ my $error = 'F*EX operation control ERROR';
 
 chdir $spooldir or die "$spooldir - $!\n";
 
-$akeydir = "$spooldir/.akeys"; 
+$akeydir = "$spooldir/.akeys";
 $user = $id = '';
 
 # look for CGI parameters
@@ -33,7 +33,7 @@ our %PARAM;
 foreach my $v (keys %PARAM) {
   my $vv = $PARAM{$v};
   # debuglog("Param: $v=\"$vv\"");
-  if ($v =~ /^akey$/i and $vv =~ /^(\w+)$/) { 
+  if ($v =~ /^akey$/i and $vv =~ /^(\w+)$/) {
     $akey = $1;
   } elsif ($v =~ /^(from|user)$/i) {
     $user = normalize_email($vv);