Parent Directory | Revision Log | Patch
revision 843 by dpavlin, Wed Apr 11 12:22:37 2007 UTC | revision 844 by dpavlin, Sat May 26 10:40:01 2007 UTC | |
---|---|---|
# | Line 519 sub stats { | Line 519 sub stats { |
519 | ||
520 | my $out = join("\n", | my $out = join("\n", |
521 | map { | map { |
522 | my $f = $_ || die "no field"; | my $f = $_; |
523 | die "no field in ", dump( $s->{fld} ) unless defined( $f ); | |
524 | my $v = $s->{fld}->{$f} || die "no s->{fld}->{$f}"; | my $v = $s->{fld}->{$f} || die "no s->{fld}->{$f}"; |
525 | $max_fld = $v if ($v > $max_fld); | $max_fld = $v if ($v > $max_fld); |
526 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |