diff options
author | aurynn_cmd <aurynn_cmd@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-18 21:16:17 +0000 |
---|---|---|
committer | aurynn_cmd <aurynn_cmd@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-18 21:16:17 +0000 |
commit | 0d4b0b2cf4be896167ff411d22125c378573b762 (patch) | |
tree | 3b20fed1e21741a53807e03c64f0e5c176c69b58 /scripts | |
parent | 2e513eecb022613bfea6e040a4a21897316d5585 (diff) |
Creation of Edit/Create user templates. Addition of a Cancel button to the admin.pl, which take one back to the initial page.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1634 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/admin.pl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/scripts/admin.pl b/scripts/admin.pl index 7daf463b..32413d27 100644 --- a/scripts/admin.pl +++ b/scripts/admin.pl @@ -126,7 +126,7 @@ sub new_user { my ($class, $request) = @_; my $template = LedgerSMB::Template->new( user=>$user, - template=>'Admin/new_user', language=>$user->{language}, + template=>'Admin/edit_user', language=>$user->{language}, format=>'HTML', path=>'UI'); $template->render(); @@ -143,6 +143,11 @@ sub new_group { $template->render(); } +sub cancel { + + __default(@_); +} + sub __default { my ($class, $request) = @_; @@ -154,5 +159,4 @@ sub __default { format=>'HTML', path=>'UI'); $template->render(); } - 1;
\ No newline at end of file |