diff options
| author | fukachan <fukachan> | 2002-03-07 14:19:51 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-03-07 14:19:51 +0000 |
| commit | db34409152d3aedffa42010c4009679cc4af510b (patch) | |
| tree | a665f78867486f00e5399e63490d7540ee7a5b85 | |
| parent | b6e20bc5a93afc85428d2dfa8ecffea321c85814 (diff) | |
| download | fml8-db34409152d3aedffa42010c4009679cc4af510b.tar.gz fml8-db34409152d3aedffa42010c4009679cc4af510b.tar.bz2 fml8-db34409152d3aedffa42010c4009679cc4af510b.zip | |
add menu.cgi using FML::CGI::Admin::Menu
| -rw-r--r-- | fml/lib/FML/Process/Switch.pm | 10 |
1 files 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'; } |