From 44d035fe38dac0b91e1fdadb576459f5ec19739a Mon Sep 17 00:00:00 2001
From: tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Thu, 17 May 2007 21:15:52 +0000
Subject: 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
---
 bin/menu.pl | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'bin')

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, "" );
-- 
cgit v1.2.3