--- loncom/interface/lonhtmlcommon.pm 2003/07/25 19:56:37 1.28
+++ loncom/interface/lonhtmlcommon.pm 2003/09/29 13:49:31 1.30
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.28 2003/07/25 19:56:37 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.30 2003/09/29 13:49:31 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -56,6 +56,7 @@ html.
package Apache::lonhtmlcommon;
use Time::Local;
+use Apache::lonlocal;
use strict;
@@ -181,6 +182,16 @@ sub date_setter {
document.$formname.$dname\_day.value = 30;
}
}
+
+ function $dname\_opencalendar() {
+ var calwin=window.open(
+"/adm/announcements?pickdate=yes&formname=$formname&element=$dname&month="+
+document.$formname.$dname\_month.value+"&year="+
+document.$formname.$dname\_year.value,
+ "LONCAPAcal",
+ "height=350,width=350,scrollbars=yes,resizable=yes,menubar=no");
+
+ }
ENDJS
$result .= " \n";
$result .= " \n";
}
$result .= " \n";
$result .= " m\n";
$result .= " s\n";
- $result .= "\n\n";
+ $result .= "".
+ &mt('Select Date')."\n\n";
return $result;
}