From db34409152d3aedffa42010c4009679cc4af510b Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Thu, 7 Mar 2002 14:19:51 +0000
Subject: add menu.cgi using FML::CGI::Admin::Menu

---
 fml/lib/FML/Process/Switch.pm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/fml/lib/FML/Process/Switch.pm b/fml/lib/FML/Process/Switch.pm
index 60c2e08b..78f16f05 100644
--- a/fml/lib/FML/Process/Switch.pm
+++ b/fml/lib/FML/Process/Switch.pm
@@ -4,7 +4,7 @@
 #   All rights reserved. This program is free software; you can
 #   redistribute it and/or modify it under the same terms as Perl itself.
 #
-# $FML: Switch.pm,v 1.54 2002/02/13 13:01:38 fukachan Exp $
+# $FML: Switch.pm,v 1.55 2002/03/06 14:45:59 fukachan Exp $
 #
 
 package FML::Process::Switch;
@@ -403,7 +403,7 @@ sub _module_specific_options
     elsif ($myname eq 'makefml') {
 	return qw(debug! help! force! params=s -c=s);
     }
-    elsif ($myname eq 'makefml.cgi') {
+    elsif ($myname eq 'makefml.cgi' || $myname eq 'menu.cgi') {
 	return ();
     }
     elsif ($myname eq 'fmlsch') {
@@ -438,6 +438,9 @@ sub _ml_name_is_required
     elsif ($myname eq 'makefml') {
 	return 0;
     }
+    elsif ($myname eq 'menu.cgi') {
+	return 0;
+    }
     else {
 	return 1;
     }
@@ -491,6 +494,9 @@ sub _module_we_use
     elsif ($name eq 'makefml.cgi') {
 	$pkg = 'FML::CGI::Configure';
     }
+    elsif ($name eq 'menu.cgi') {
+	$pkg = 'FML::CGI::Admin::Menu';
+    }
     elsif ($name eq 'fmlsch') {
 	$pkg = 'FML::Process::Calender';
     }
-- 
cgit v1.2.1