diff options
| -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 |