From: Kurt D. Starsinic <kstar@wolfetech.com>
Date: Fri, 20 Nov 1998 21:30:17 +0000 (+0200)
Subject: Re: [PATCH] Re: pod2man bug in date generated line
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=10d20342241794db0c535c2739c380f367a9f178;p=p5sagit%2Fp5-mst-13.2.git

Re: [PATCH] Re: pod2man bug in date generated line
To: Albert Dvornik <bert@genscan.com>, "Larry W. Virden" <lvirden@cas.org>
Cc: perlbug@perl.com
Message-ID: <MLIST_19981120131523.A464@O2.chapin.edu>

p4raw-id: //depot/cfgperl@2259
---

diff --git a/pod/pod2man.PL b/pod/pod2man.PL
index 9d0ecc3..4edf4f8 100644
--- a/pod/pod2man.PL
+++ b/pod/pod2man.PL
@@ -331,6 +331,7 @@ sub makedate {
     my $secs = shift;
     my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($secs);
     my $mname = (qw{Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec})[$mon];
+    $year += 1900;
     return "$mday/$mname/$year";
 }