diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-14 18:25:20 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-14 18:25:20 +0000 |
| commit | e85ca32baf0e7166244f1c18bf4a7bc84cbca758 (patch) | |
| tree | b966bb13dda6d650f385bc1b77d7be2848146681 /lib/Time/Local.pm | |
| parent | ca415e26af613508020b075b8e32bbfac1f0074a (diff) | |
| download | perl-e85ca32baf0e7166244f1c18bf4a7bc84cbca758.tar.gz | |
make timelocal work better when time is close to the epoch
east of GMT (from Keiki SATOH <kki@wakusei.ne.jp>)
p4raw-id: //depot/perl@4378
Diffstat (limited to 'lib/Time/Local.pm')
| -rw-r--r-- | lib/Time/Local.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Time/Local.pm b/lib/Time/Local.pm index 75bcc38eea..f2f1672941 100644 --- a/lib/Time/Local.pm +++ b/lib/Time/Local.pm @@ -44,7 +44,7 @@ sub timelocal { if ($t < $DAY and ($lt[5] >= 70 or $gt[5] >= 70 )) { # Wrap error, too early a date # Try a safer date - $tt = $DAY; + $tt += $DAY; @lt = localtime($tt); @gt = gmtime($tt); } |