From: Robin Barker <RMBarker@cpan.org>
Date: Fri, 22 Jun 2001 19:25:56 +0000 (+0100)
Subject: missing DATE_OF_02
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d5a05a340c0196d58d7d52443fc932ff9d1f429b;p=p5sagit%2Fp5-mst-13.2.git

missing DATE_OF_02
Message-Id: <200106221825.TAA16884@tempest.npl.co.uk>

p4raw-id: //depot/perl@10897
---

diff --git a/lib/CPAN.pm b/lib/CPAN.pm
index 7cab8c6..817e970 100644
--- a/lib/CPAN.pm
+++ b/lib/CPAN.pm
@@ -3360,7 +3360,8 @@ sub read_metadata_cache {
                             # does initialize to some protocol
     $LAST_TIME = $cache->{last_time};
     $DATE_OF_02 = $cache->{DATE_OF_02};
-    $CPAN::Frontend->myprint("  Database was generated on $DATE_OF_02\n");
+    $CPAN::Frontend->myprint("  Database was generated on $DATE_OF_02\n")
+	if defined $DATE_OF_02; # An old cache may not contain DATE_OF_02
     return;
 }