--- loncom/build/filecompare.pl	2001/12/06 23:14:33	1.10
+++ loncom/build/filecompare.pl	2002/02/05 00:52:08	1.11
@@ -3,7 +3,7 @@
 # The LearningOnline Network with CAPA
 # filecompare.pl - script used to help probe and compare file statistics
 #
-# $Id: filecompare.pl,v 1.10 2001/12/06 23:14:33 harris41 Exp $
+# $Id: filecompare.pl,v 1.11 2002/02/05 00:52:08 harris41 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -503,12 +503,18 @@ sub cvstime {
     }
     my $cvstime;
     if ($buildmode!=3) {
-	my $entry=`grep '^/$file/' ${path}CVS/Entries` or
-	    die('*** ERROR *** cannot grep against '.${path}.
-		'CVS/Entries for ' .$file . "\n");
-        my @fields=split(/\//,$entry);
-        $cvstime=`date -d '$fields[3] UTC' --utc +"%s"`;
-        chomp $cvstime;
+	my $entry=`grep '^/$file/' ${path}CVS/Entries`;
+# or
+#	    die('*** WARNING *** cannot grep against '.${path}.
+#		'CVS/Entries for ' .$file . "\n");
+	if ($entry) {
+	    my @fields=split(/\//,$entry);
+	    $cvstime=`date -d '$fields[3] UTC' --utc +"%s"`;
+	    chomp $cvstime;
+	}
+	else {
+	    $cvstime='n/a';
+	}
     }
     else {
 	$cvstime='n/a';