Altering test cases to better match LedgerSMB.pm

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1303 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 2 insertions, 1 deletions

diff --git a/LedgerSMB.pm b/LedgerSMB.pm
index 299fbe97..193e258d 100755
--- a/LedgerSMB.pm
+++ b/LedgerSMB.pm
@@ -121,6 +121,8 @@ use LedgerSMB::Sysconfig;
 use Data::Dumper;
 use LedgerSMB::Session;
 use LedgerSMB::Template;
+use LedgerSMB::Locale;
+use LedgerSMB::User;
 use strict;
 
 package LedgerSMB;
@@ -133,7 +135,6 @@ sub new {
     $self->{version}   = "1.3.0 Alpha 0 Pre";
     $self->{dbversion} = "1.2.0";
     bless $self, $type;
-
     my $query = ($argstr) ? new CGI($argstr) : new CGI;
     my $params = $query->Vars;