From 6b699cb21edd6773db91eda8ab43311f2d5cc855 Mon Sep 17 00:00:00 2001 From: fukachan Date: Tue, 26 Nov 2002 10:47:22 +0000 Subject: fix help and conditions to show help --- fml/lib/FML/Process/Summary.pm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/fml/lib/FML/Process/Summary.pm b/fml/lib/FML/Process/Summary.pm index 559ad169..1f33a2c4 100644 --- a/fml/lib/FML/Process/Summary.pm +++ b/fml/lib/FML/Process/Summary.pm @@ -3,7 +3,7 @@ # Copyright (C) 2001,2002 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Summary.pm,v 1.1 2002/11/26 09:45:34 fukachan Exp $ +# $FML: Summary.pm,v 1.2 2002/11/26 10:30:06 fukachan Exp $ # package FML::Process::Summary; @@ -90,14 +90,14 @@ sub prepare sub verify_request { my ($curproc, $args) = @_; - my $argv = $curproc->command_line_argv(); - my $len = $#$argv + 1; + my $argv = $curproc->command_line_argv(); + my $len = $#$argv; my $config = $curproc->{ config }; my $eval = $config->get_hook( 'fmlsummary_verify_request_start_hook' ); if ($eval) { eval qq{ $eval; }; LogWarn($@) if $@; } - if (0) { + if ($len < 1) { print STDERR "Error: missing argument(s)\n"; $curproc->help(); exit(0); @@ -178,7 +178,7 @@ Usage: $name \$command \$ml_name [options] $name help \$ml_name show this help -$name list +$name rebuild \$ml_name rebuild summary file. _EOF_ } -- cgit v1.2.1