[LON-CAPA-cvs] cvs: loncom /auth lonlogin.pm /homework lonhomework.pm response.pm /interface lonpreferences.pm

[bisitz]

bisitz		Mon Mar 16 18:20:26 2009 EDT

  Modified files:              
    /loncom/auth	lonlogin.pm 
    /loncom/homework	lonhomework.pm response.pm 
    /loncom/interface	lonpreferences.pm 
  Log:
  XHTML conform javascript start tag attributes
  
  
Index: loncom/auth/lonlogin.pm
diff -u loncom/auth/lonlogin.pm:1.115 loncom/auth/lonlogin.pm:1.116
--- loncom/auth/lonlogin.pm:1.115	Mon Mar 16 18:10:05 2009
+++ loncom/auth/lonlogin.pm	Mon Mar 16 18:20:17 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Login Screen
 #
-# $Id: lonlogin.pm,v 1.115 2009/03/16 18:10:05 bisitz Exp $
+# $Id: lonlogin.pm,v 1.116 2009/03/16 18:20:17 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -270,7 +270,7 @@
 my $now=time;
 my $js = (<<ENDSCRIPT);
 
-<script language="JavaScript">
+<script type="text/javascript" language="JavaScript">
 function send()
 {
 this.document.server.elements.uname.value
Index: loncom/homework/lonhomework.pm
diff -u loncom/homework/lonhomework.pm:1.305 loncom/homework/lonhomework.pm:1.306
--- loncom/homework/lonhomework.pm:1.305	Wed Mar  4 17:57:11 2009
+++ loncom/homework/lonhomework.pm	Mon Mar 16 18:20:22 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.305 2009/03/04 17:57:11 bisitz Exp $
+# $Id: lonhomework.pm,v 1.306 2009/03/16 18:20:22 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -173,7 +173,7 @@
 sub createmenu {
     my ($which,$request)=@_;
     if ($which eq 'grade') {
-	$request->print('<script language="JavaScript"> 
+	$request->print('<script type="text/javascript" language="JavaScript"> 
           hwkmenu=window.open("/res/adm/pages/homeworkmenu.html","homeworkremote",
                  "height=350,width=150,menubar=no");
           </script>');
Index: loncom/homework/response.pm
diff -u loncom/homework/response.pm:1.212 loncom/homework/response.pm:1.213
--- loncom/homework/response.pm:1.212	Fri Mar 13 00:34:20 2009
+++ loncom/homework/response.pm	Mon Mar 16 18:20:22 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # various response type definitons response definition
 #
-# $Id: response.pm,v 1.212 2009/03/13 00:34:20 raeburn Exp $
+# $Id: response.pm,v 1.213 2009/03/16 18:20:22 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -538,7 +538,7 @@
 #    my $helplink=&Apache::loncommon::help_open_topic('Formula_Editor');
     my $iconpath=$Apache::lonnet::perlvar{'lonIconsURL'};
     return(<<ENDFORMULABUTTON);
-<script language="JavaScript">
+<script type="text/javascript" language="JavaScript">
 function edit_${id}_${field} (textarea) {
     thenumber = textarea;
     thedata = document.forms['lonhomework'].elements[textarea].value;
Index: loncom/interface/lonpreferences.pm
diff -u loncom/interface/lonpreferences.pm:1.147 loncom/interface/lonpreferences.pm:1.148
--- loncom/interface/lonpreferences.pm:1.147	Thu Feb 26 16:17:29 2009
+++ loncom/interface/lonpreferences.pm	Mon Mar 16 18:20:26 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Preferences
 #
-# $Id: lonpreferences.pm,v 1.147 2009/02/26 16:17:29 schafran Exp $
+# $Id: lonpreferences.pm,v 1.148 2009/03/16 18:20:26 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -251,7 +251,7 @@
 <h3>$lt{'jsmath'}</h3> 
 <p>
 $jsMath_start
-<script type="text/javascript">
+<script type="text/javascript" language="JavaScript">
 if (jsMath.nofonts == 1) {
     document.writeln
         ('<div style="padding: 10; border-style: solid; border-width:3;'
@@ -281,7 +281,7 @@
 </p>
 ENDLSCREEN
     if ($env{'environment.texengine'} ne 'jsMath') {
-	$r->print('<script type="text/javascript">jsMath.Process()</script>');
+	$r->print('<script type="text/javascript" language="JavaScript">jsMath.Process()</script>');
     }
 }
 
@@ -798,7 +798,7 @@
     my %allnot = &get_notifications(\%userenv);
     my $validatescript = &Apache::lonhtmlcommon::javascript_valid_email();
     my $jscript = qq|
-<script type="text/javascript">
+<script type="text/javascript" language="JavaScript">
 function validate() {
     for (var i=0; i<document.prefs.numnotify.value; i++) {
         var checkaddress = 0;
@@ -1120,7 +1120,7 @@
     my $rstall = &mt('Reset All');
     my $resetdefault = &mt('Reset All Colors to Default');
     $r->print(<<ENDCOL);
-<script type="text/javascript">
+<script type="text/javascript" language="JavaScript">
 
     function pclose() {
         parmwin=window.open("/adm/rat/empty.html","LONCAPAparms",
@@ -1298,7 +1298,7 @@
 sub jscript_send {
     my ($caller) = @_;
     my $output = qq|
-<script language="JavaScript">
+<script type="text/javascript" language="JavaScript">
 
     function send() {
         uextkey=this.document.client.elements.ukey_cpass.value;