From 50be11c3574706cae5e219ba910e8221e50da4e8 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Wed, 27 Jun 2007 15:19:55 +0000
Subject: Moving menu.pl to old-handler.pl and adjusting top level scripts
 accordingly. Including also an unfinished and inactive version of the menu
 system running under the new architecture.

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1334 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'LedgerSMB.pm')

diff --git a/LedgerSMB.pm b/LedgerSMB.pm
index 022caeb3..c75482f3 100755
--- a/LedgerSMB.pm
+++ b/LedgerSMB.pm
@@ -214,6 +214,9 @@ sub new {
             exit;
         }
     }
+
+    $self->{stylesheet} = $self->{_user}->{stylesheet};
+
     $self->_db_init;
 
     $self;
@@ -248,7 +251,7 @@ sub debug {
     my $args = shift @_;
     my $file;
     if (scalar keys %$args){
-        my $file = $args->{'file'};
+        $file = $args->{'file'};
     }
     my $d    = Data::Dumper->new( [$self] );
     $d->Sortkeys(1);
-- 
cgit v1.2.3