diff options
| author | Larry Wall <lwall@netlabs.com> | 1992-06-08 04:52:53 +0000 |
|---|---|---|
| committer | Larry Wall <lwall@netlabs.com> | 1992-06-08 04:52:53 +0000 |
| commit | 68decaef0a08fcd5db3193f825cfdfc539b67ccb (patch) | |
| tree | a16d0390e7acc0fcc16eba0be8259a2214efd9fe /lib/ctime.pl | |
| parent | bf10efe7e35fa48859e575b890018da16608a9d7 (diff) | |
| download | perl-68decaef0a08fcd5db3193f825cfdfc539b67ccb.tar.gz | |
perl 4.0 patch 22: patch #20, continued
See patch #20.
Diffstat (limited to 'lib/ctime.pl')
| -rw-r--r-- | lib/ctime.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/ctime.pl b/lib/ctime.pl index 988d05a841..6000d29a19 100644 --- a/lib/ctime.pl +++ b/lib/ctime.pl @@ -3,7 +3,7 @@ ;# Waldemar Kebsch, Federal Republic of Germany, November 1988 ;# kebsch.pad@nixpbe.UUCP ;# Modified March 1990, Feb 1991 to properly handle timezones -;# $Id: ctime.pl,v 1.8 91/02/04 18:28:12 hakanson Exp $ +;# $RCSfile: ctime.pl,v $$Revision: 4.0.1.1 $$Date: 92/06/08 13:38:06 $ ;# Marion Hakanson (hakanson@cse.ogi.edu) ;# Oregon Graduate Institute of Science and Technology ;# @@ -24,6 +24,7 @@ sub ctime { package ctime; local($time) = @_; + local($[) = 0; local($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst); # Determine what time zone is in effect. |