Uncomment code commented-out-for-debugging in r5250. Fixes ledgersmb#873

. git-svn-id: svn://svn.code.sf.net/p/ledger-smb/code/branches/1.3@5928 4979c152-3d1c-0410-bac9-87ea11338e46
pongraczi · Aug 1, 2013 · 58e6e8f · 58e6e8f
1 parent 9b644c2
commit 58e6e8f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/common.pl b/common.pl
@@ -36,11 +36,11 @@ sub redirect {
         print "Content-type: text/html\n\n";
         return;
     }
-    #if (first { $_ eq $script } @{LedgerSMB::Sysconfig::newscripts}){
+    if (first { $_ eq $script } @{LedgerSMB::Sysconfig::newscripts}){
         print "Location: $form->{callback}\n";
         print "Content-type: text/html\n\n";
         return;
-    #}
+    }
     $form->error(
         $locale->text(
             __FILE__ . ':' . __LINE__ . ':' . $script . ':' . "Invalid Redirect"