--- loncom/interface/lonsearchcat.pm 2001/03/13 15:36:15 1.8
+++ loncom/interface/lonsearchcat.pm 2001/03/14 15:26:47 1.9
@@ -111,11 +111,11 @@ END
between:
CREATIONDATESTART
- $scrout.=&dateboxes('creationdatestart');
+ $scrout.=&dateboxes('creationdatestart',1,1,1976);
$scrout.=<";
$scrout.=<
between:
LASTREVISIONDATESTART
- $scrout.=&dateboxes('lastrevisiondatestart');
+ $scrout.=&dateboxes('lastrevisiondatestart',1,1,1976);
$scrout.=<';
$scrout.=&searchphrasefield('Limit by publisher/owner','owner',
@@ -200,10 +200,10 @@ END
}
sub dateboxes {
- my ($name)=@_;
+ my ($name,$defaultmonth,$defaultday,$defaultyear)=@_;
return<
-
+
@@ -218,7 +218,7 @@ sub dateboxes {