summaryrefslogtreecommitdiff
path: root/old-handler.pl
diff options
context:
space:
mode:
authortetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-10-10 16:39:21 +0000
committertetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>2007-10-10 16:39:21 +0000
commit0029dd3fb9b2479b531b2daf08c63accf8435c34 (patch)
tree3b87c9e567296301b3b8b65e99970c366a37fd30 /old-handler.pl
parent06a4a4f4b70916f37be7214734d1147afd1f541e (diff)
Set $form->{stylesheet} after loading the user config
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1733 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'old-handler.pl')
-rwxr-xr-xold-handler.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/old-handler.pl b/old-handler.pl
index 176789a4..4100711f 100755
--- a/old-handler.pl
+++ b/old-handler.pl
@@ -115,14 +115,14 @@ if ($@) {
"$msg1 <p><a href=\"login.pl\" target=\"_top\">$msg2</a></p>");
}
-map { $form->{$_} = $myconfig{$_} } qw(stylesheet timeout)
- unless ( $form->{type} eq 'preferences' );
-
$form->db_init( \%myconfig );
&check_password;
# we get rid of myconfig and use User as a real object
%myconfig = %{ LedgerSMB::User->fetch_config( $form ) };
+map { $form->{$_} = $myconfig{$_} } qw(stylesheet timeout)
+ unless ( $form->{type} eq 'preferences' );
+
$locale = LedgerSMB::Locale->get_handle( $myconfig{countrycode} )
or $form->error( __FILE__ . ':' . __LINE__ . ": Locale not loaded: $!\n" );
# pull in the main code