--- loncom/interface/lonannounce.pm	2009/02/26 16:17:29	1.77
+++ loncom/interface/lonannounce.pm	2009/04/04 21:47:40	1.79
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Announce
 #
-# $Id: lonannounce.pm,v 1.77 2009/02/26 16:17:29 schafran Exp $
+# $Id: lonannounce.pm,v 1.79 2009/04/04 21:47:40 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -415,7 +415,7 @@ sub picklink {
 
 sub dialscript {
     return (<<ENDDIA);
-<script language="Javascript">
+<script type="text/javascript" language="JavaScript">
 function dialin(day,month,year) {
 	opener.document.$env{'form.formname'}.$env{'form.element'}\_year.value=year;
     var slct=opener.document.$env{'form.formname'}.$env{'form.element'}\_month;
@@ -517,7 +517,7 @@ sub handler {
 
 # ------------------------------------------------------------ Print the screen
     my $js = <<ENDDOCUMENT;
-<script type="text/javascript">
+<script type="text/javascript" language="JavaScript">
 
     function trysubmit() {
         document.anno.action.value="new";
@@ -590,7 +590,7 @@ ENDDOCUMENT
 	}
     }
     $r->print(
-  '<br /><input type="submit" name="serveraction" value="'.&mt('Post').'"></form><hr />');
+  '<br /><input type="submit" name="serveraction" value="'.&mt('Post').'" /></form><hr />');
     }
     if ($allowed) {
         my $coursenum=$env{'course.'.$env{'request.course.id'}.'.num'};