--- loncom/interface/lonhtmlcommon.pm 2004/10/21 11:18:06 1.94
+++ loncom/interface/lonhtmlcommon.pm 2004/11/11 18:19:41 1.95
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.94 2004/10/21 11:18:06 foxr Exp $
+# $Id: lonhtmlcommon.pm,v 1.95 2004/11/11 18:19:41 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -287,7 +287,7 @@ sub date_setter {
document.$formname.$dname\_day.value = 30;
}
}
-
+
function $dname\_disable() {
document.$formname.$dname\_month.disabled=true;
document.$formname.$dname\_day.disabled=true;
@@ -319,64 +319,62 @@ document.$formname.$dname\_year.value,
}
ENDJS
- $result .= " ';
# Day
- $result .= " \n";
+ my $dayselector = qq{};
# Year
- $result .= " \n";
- $result .= " ";
- if (! $no_hh_mm_ss) {
- # Hours
- $result .= " \n";
- if ($includeempty) { $result.=""; }
- for (my $h = 0;$h<24;$h++) {
- $result .= " \n";
- $result .= " m\n";
- $result .= " s\n";
+ my $yearselector = qq{};
+ #
+ my $hourselector = qq{};
+ if ($includeempty) {
+ $hourselector.=qq{};
+ }
+ for (my $h = 0;$h<24;$h++) {
+ $hourselector .= qq{\n";
+ my $minuteselector = qq{};
+ my $secondselector= qq{};
+ my $cal_link = qq{};
+ #
+ if ($no_hh_mm_ss) {
+ $result .= &mt('[_1] [_2] [_3] [_4]Select Date[_5]',
+ $monthselector,$dayselector,$yearselector,
+ $cal_link,'');
+ } else {
+ $result .= &mt('[_1] [_2] [_3] [_4] [_5]m [_6]s [_7]Select Date[_8]',
+ $monthselector,$dayselector,$yearselector,
+ $hourselector,$minuteselector,$secondselector,
+ $cal_link,'');
}
- $result .= "".
- &mt('Select Date')."\n\n";
+ $result .= "\n\n";
return $result;
}