This patch makes sure that the output generated by --help is sorted and
consistent:
Index: TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.11
diff -u -r1.11 TestConfig.pm
--- TestConfig.pm 2001/07/23 20:43:16 1.11
+++ TestConfig.pm 2001/08/02 14:19:28
@@ -35,8 +35,8 @@
sub usage {
for my $hash (\%usage) {
- while (my($key, $val) = each %$hash) {
- printf " %-16s %s\n", $key, $val;
+ for (sort keys %$hash){
+ printf " -%-16s %s\n", $_, $hash->{$_};
}
}
}
Index: TestRun.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
retrieving revision 1.12
diff -u -r1.12 TestRun.pm
--- TestRun.pm 2001/08/02 05:37:33 1.12
+++ TestRun.pm 2001/08/02 14:19:28
@@ -406,8 +406,8 @@
where options include:
EOM
- while (my($key, $val) = each %usage) {
- printf " -%-16s %s\n", $key, $val;
+ for (sort keys %usage){
+ printf " -%-16s %s\n", $_, $usage{$_};
}
print "\n configuration options:\n";
_____________________________________________________________________
Stas Bekman JAm_pH -- Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide http://perl.apache.org/guide
mailto:[EMAIL PROTECTED] http://apachetoday.com http://eXtropia.com/
http://singlesheaven.com http://perl.apache.org http://perlmonth.com/
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
