--- loncom/interface/lonsearchcat.pm	2001/03/21 12:51:15	1.62
+++ loncom/interface/lonsearchcat.pm	2001/03/21 12:58:30	1.63
@@ -926,9 +926,9 @@ sub build_date_queries {
 		   "a starting month, day, and year and an ending month, ".
 		   "day, and year.";
 	}
-	my $cnumeric1="$cyear1$cmonth1$cday1";
+	my $cnumeric1=sprintf("%d%2d%2d",$cyear1,$cmonth1,$cday1);
 	$cnumeric1+=0;
-	my $cnumeric2="$cyear2$cmonth2$cday2";
+	my $cnumeric2=sprintf("%d%2d%2d",$cyear2,$cmonth2,$cday2);
 	$cnumeric2+=0;
 	if ($cnumeric1>$cnumeric2) {
 	    return "Incorrect entry for the creation date.  The starting ".
@@ -945,9 +945,9 @@ sub build_date_queries {
 		   "specify a starting month, day, and year and an ending ".
 		   "month, day, and year.";
 	}
-	my $lnumeric1="$lyear1$lmonth1$lday1";
+	my $lnumeric1=sprintf("%d%2d%2d",$lyear1,$lmonth1,$lday1);
 	$lnumeric1+=0;
-	my $lnumeric2="$lyear2$lmonth2$lday2";
+	my $lnumeric2=sprintf("%d%2d%2d",$lyear2,$lmonth2,$lday2);
 	$lnumeric2+=0;
 	if ($lnumeric1>$lnumeric2) {
 	    return "Incorrect entry for the last revision date.  The ".