summaryrefslogtreecommitdiff
path: root/scripts/admin.pl
diff options
context:
space:
mode:
authoraurynn_cmd <aurynn_cmd@4979c152-3d1c-0410-bac9-87ea11338e46>2007-10-03 01:32:37 +0000
committeraurynn_cmd <aurynn_cmd@4979c152-3d1c-0410-bac9-87ea11338e46>2007-10-03 01:32:37 +0000
commit84b3533f6d54cf37e1bf6b616da4d02523a45fb3 (patch)
treeb4a0056704aa815d66214fe4db28477bc6af3408 /scripts/admin.pl
parent46cd8dc840a5796513b208c251139b500d4dca7e (diff)
Disabled login checking in LedgerSMB.pm, temporarily.
Whitespace cleanup in DB.pm Modifications to remove user_conf from User.pm git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1692 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'scripts/admin.pl')
-rw-r--r--scripts/admin.pl3
1 files changed, 1 insertions, 2 deletions
diff --git a/scripts/admin.pl b/scripts/admin.pl
index 9947b501..18fb0ca8 100644
--- a/scripts/admin.pl
+++ b/scripts/admin.pl
@@ -10,7 +10,6 @@ sub new_user {
# uses the same page as create_user, only pre-populated.
#my ($class, $request) = @_;
- my $class = shift @_;
my $request = shift @_;
my $admin = LedgerSMB::DBObject::Admin->new(base=>$request, copy=>'all');
@@ -154,7 +153,7 @@ sub __default {
my ($class, $request) = @_;
- # check for login
+ # TODO: check for login stuff.
my $template;
$template = LedgerSMB::Template->new( user=>$user,
template=>'Admin/main', language=>$user->{language},