diff options
| author | fukachan <fukachan> | 2001-11-25 07:53:13 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-11-25 07:53:13 +0000 |
| commit | 4ee4089652568b59aebf8e1fe1a2b23d57cb3888 (patch) | |
| tree | 154e0541dcb0df12d9db4d71504a240dc50d99d7 /fml/lib/FML/Process | |
| parent | 22645f477162aee0f2455f73bc1fca3540282d94 (diff) | |
| download | fml8-4ee4089652568b59aebf8e1fe1a2b23d57cb3888.tar.gz fml8-4ee4089652568b59aebf8e1fe1a2b23d57cb3888.tar.bz2 fml8-4ee4089652568b59aebf8e1fe1a2b23d57cb3888.zip | |
define dummy finish(), fix help() trap pattern
Diffstat (limited to 'fml/lib/FML/Process')
| -rw-r--r-- | fml/lib/FML/Process/ConfViewer.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/fml/lib/FML/Process/ConfViewer.pm b/fml/lib/FML/Process/ConfViewer.pm index 221685fe..702c967a 100644 --- a/fml/lib/FML/Process/ConfViewer.pm +++ b/fml/lib/FML/Process/ConfViewer.pm @@ -4,7 +4,7 @@ # Copyright (C) 2000,2001 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Configure.pm,v 1.30 2001/11/25 03:55:38 fukachan Exp $ +# $FML: ConfViewer.pm,v 1.1 2001/11/25 05:13:22 fukachan Exp $ # package FML::Process::ConfViewer; @@ -87,7 +87,7 @@ sub verify_request my ($curproc, $args) = @_; my $argv = $curproc->command_line_argv(); - if (length(@$argv) == 1) { + if (length(@$argv) == 0) { $curproc->help(); exit(0); } @@ -153,6 +153,12 @@ _EOF_ } +sub finish +{ + 1; +} + + =head2 C<_fmlconf($args)> (INTERNAL USE) run dump_variables of C<FML::Config>. |