--- loncom/interface/lonsource.pm	2009/06/09 13:50:03	1.23
+++ loncom/interface/lonsource.pm	2009/08/13 11:00:38	1.24
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Source Code handler
 #
-# $Id: lonsource.pm,v 1.23 2009/06/09 13:50:03 bisitz Exp $
+# $Id: lonsource.pm,v 1.24 2009/08/13 11:00:38 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -135,7 +135,7 @@ sub delete_copy_file {
                  .&mt('Please use the code view in previous window to use shared code.')
                  .'<br /><br />');
         $r->print('<input type="button" value="Close Window" name="close"'
-                 .' onClick="window.close()" />'
+                 .' onclick="window.close()" />'
                  .'</p>');
     } else {
         if(-e $path_to_new_file) {
@@ -182,7 +182,7 @@ sub copy_file {
         print $fs $file_output;
     }
     $r->print("<br /><br />");
-    $r->print('<input type="button" value="Close Window" name="close" onClick="window.close()" />');
+    $r->print('<input type="button" value="Close Window" name="close" onclick="window.close()" />');
     #Some 1.3'ish feature is to include the derivative feature, will go here..'
 }
 
@@ -258,7 +258,7 @@ sub handler {
         &delete_copy_file($r, $env{'form.author'}, $env{'form.newpath'}, $env{'form.filename'}, $env{'form.path'}, '0');
     } else {
 	$r->print('<form name="copy" action="/adm/source" target="_parent" method="post">
-                  <input type="button" value="'.&mt('Close Window').'" name="close" onClick="window.close()" />
+                  <input type="button" value="'.&mt('Close Window').'" name="close" onclick="window.close()" />
                   <input type="hidden" name="filename" value="'.$filename.'" />
                   <input type="hidden" name="listname" value="'.$listname.'" />
                   <input type="hidden" name="action" value="stage2" />