diff --git a/common.pl b/common.pl index 93a45c095a..751d6e84d5 100644 --- 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"