diff options
author | aurynn_cmd <aurynn_cmd@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-17 18:01:50 +0000 |
---|---|---|
committer | aurynn_cmd <aurynn_cmd@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-17 18:01:50 +0000 |
commit | 9c171016e2643b8f2f514c37621bb22db382ba7e (patch) | |
tree | ebfa9b9707529da97a2f6a2aebf54cb9e7b9201a /scripts | |
parent | e4bae61c5b3176c3b84b4840f77d5cb432847edc (diff) |
format => 'html' causes the error Can't locate LedgerSMB/Template/html.pm in @INC .
Changing admin to format => 'HTML'.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1624 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/admin.pl | 13 | ||||
-rw-r--r-- | scripts/customer.pl | 3 |
2 files changed, 9 insertions, 7 deletions
diff --git a/scripts/admin.pl b/scripts/admin.pl index 55b87a1a..c1706aad 100644 --- a/scripts/admin.pl +++ b/scripts/admin.pl @@ -1,6 +1,7 @@ +#!/usr/bin/perl package LedgerSMB::Scripts::admin; -require '../lsmb-request.pl'; +require 'lsmb-request.pl'; use LedgerSMB::Template; use LedgerSMB::DBObject::Admin; @@ -20,14 +21,14 @@ sub new_user { my $template = LedgerSMB::Template->new( user => $user, template => 'admin/edit_user.html', language => $user->{language}, - format => 'html'); + format => 'HTML'); $template->render($entity); } else { my $template = LedgerSMB::Template->new( user => $user, template => 'admin/edit_user.html', language => $user->{language}, - format => 'html'); + format => 'HTML'); $template->render(); } @@ -44,7 +45,7 @@ sub edit_user { my $template = LedgerSMB::Template->new( user => $user, template => 'admin/edit_user.html', language => $user->{language}, - format => 'html'); + format => 'HTML'); $template->render($edited_user, $all_roles); } @@ -59,7 +60,7 @@ sub edit_group { my $template = LedgerSMB::Template->new( user => $user, template => 'admin/edit_group.html', language => $user->{language}, - format => 'html'); + format => 'HTML'); $template->render($all_roles); } @@ -73,7 +74,7 @@ sub create_group { my $template = LedgerSMB::Template->new( user => $user, template => 'admin/edit_group.html', language => $user->{language}, - format => 'html'); + format => 'HTML'); $template->render($all_roles); } diff --git a/scripts/customer.pl b/scripts/customer.pl index c89cd5c5..24fb04f6 100644 --- a/scripts/customer.pl +++ b/scripts/customer.pl @@ -1,3 +1,4 @@ +#!/usr/bin/perl =pod @@ -22,7 +23,7 @@ package LedgerSMB::Scripts::customer; use LedgerSMB::Template; use LedgerSMB::DBObject::Customer; -require '../lsmb-request.pl'; +require 'lsmb-request.pl'; =pod |