summaryrefslogtreecommitdiff
path: root/common.pl
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-12 06:15:48 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-12 06:15:48 +0000
commit501e9fc80c27a4da942527e4ffd285b6629eae91 (patch)
tree2ebf46e02407eeae55e3cb771ded79300f1fcac3 /common.pl
parent16b10f9cddca05aa2c3f63a15238c983b873bf23 (diff)
Fixed one bug in IR.pm
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@521 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'common.pl')
-rw-r--r--common.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/common.pl b/common.pl
index bc227697..ac104f82 100644
--- a/common.pl
+++ b/common.pl
@@ -27,7 +27,9 @@ sub redirect {
use List::Util qw(first);
my ($script, $argv) = split(/\?/, $form->{callback});
- my @common_attrs = qw(dbh login favicon stylesheet titlebar password);
+ my @common_attrs =
+ qw(dbh login favicon stylesheet titlebar password
+ );
if (!$script){ # http redirect to login.pl if called w/no args
print "Location: login.pl\n";