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

1 files changed, 4 insertions, 1 deletions

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);