[y2038 commit] r170 - trunk/perl/Time-y2038/inc/Local/Module

[codesite...@google.com]

Author: schwern
Date: Tue Nov 11 15:58:27 2008
New Revision: 170

Modified:
trunk/perl/Time-y2038/inc/Local/Module/Build.pm

Log:
note_time_limits() was dropping "footime_min 0"

Modified: trunk/perl/Time-y2038/inc/Local/Module/Build.pm
==============================================================================
--- trunk/perl/Time-y2038/inc/Local/Module/Build.pm (original)
+++ trunk/perl/Time-y2038/inc/Local/Module/Build.pm Tue Nov 11 15:58:27 2008
@@ -26,9 +26,10 @@

my %limits;
for my $line (@maxes) {
- next if $line =~ /^#/;
+ next if $line =~ /^#/; # comment
+ next if $line !~ /\S/; # blank line
+
my($key, $val) = split /\s+/, $line;
- next unless $key and $val;
$limits{$key} = $val;
}