diff options
| author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-17 21:15:52 +0000 |
|---|---|---|
| committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-17 21:15:52 +0000 |
| commit | 44d035fe38dac0b91e1fdadb576459f5ec19739a (patch) | |
| tree | 2ef80eb7922db5b86a76526eb3b16a50bcc69add /bin | |
| parent | 0a4abf20866526b5803ab3fbe0e484ad7cda3588 (diff) | |
Merging Inifile and Menu into Menufile
Fixed a scope bug in Menufile, and added more tests
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1204 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin')
| -rw-r--r-- | bin/menu.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/bin/menu.pl b/bin/menu.pl index 1d44caaf..f2bd469e 100644 --- a/bin/menu.pl +++ b/bin/menu.pl @@ -16,7 +16,7 @@ ####################################################################### $menufile = "menu.ini"; -use LedgerSMB::Menu; +use LedgerSMB::Menufile; 1; @@ -26,7 +26,7 @@ sub display { if ( $form->{lynx} ) { - $menu = new Menu "$menufile"; + $menu = new LedgerSMB::Menufile "$menufile"; $menu->add_file("custom_$menufile") if -f "custom_$menufile"; $menu->add_file("$form->{login}_$menufile") if -f "$form->{login}_$menufile"; @@ -81,7 +81,7 @@ sub acc_menu { } else { - my $menu = new Menu "$menufile"; + my $menu = new LedgerSMB::Menufile "$menufile"; $menu->add_file("custom_$menufile") if -f "custom_$menufile"; $menu->add_file("$form->{login}_$menufile") if -f "$form->{login}_$menufile"; @@ -136,7 +136,7 @@ sub section_menu { if ( $form->{lynx} ) { - $menu = new Menu "$menufile", $form->{level}; + $menu = new LedgerSMB::Menufile "$menufile", $form->{level}; $menu->add_file("custom_$menufile") if -f "custom_$menufile"; $menu->add_file("$form->{login}_$menufile") @@ -344,7 +344,7 @@ sub menubar { if ( $form->{lynx} ) { - $menu = new Menu "$menufile", ""; + $menu = new LedgerSMB::Menufile "$menufile", ""; # build menubar @menuorder = $menu->access_control( \%myconfig, "" ); |