--- loncom/interface/lonhtmlcommon.pm	2004/06/03 14:28:39	1.72
+++ loncom/interface/lonhtmlcommon.pm	2004/06/03 16:42:02	1.73
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.72 2004/06/03 14:28:39 www Exp $
+# $Id: lonhtmlcommon.pm,v 1.73 2004/06/03 16:42:02 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -875,13 +875,10 @@ sub htmlareaheaders {
     }
     return (<<ENDHEADERS);
 <script type="text/javascript">
-    _editor_url="/htmlarea/";
-</script>
-<script type="text/javascript" src="/htmlarea/htmlarea.js"></script>
-<style type="text/javascript">
 _editor_url='/htmlarea/';
 _editor_lang='$lang';
-</style>
+</script>
+<script type="text/javascript" src="/htmlarea/htmlarea.js"></script>
 ENDHEADERS
 }
 
@@ -899,12 +896,13 @@ ENDSCRIPT
 # ----------------------------------------- Script to activate only some fields
 
 sub htmlareaselectactive {
+    my @fields=@_;
     if (&htmlareablocked()) { return ''; }
     my $output='<script type="text/javascript" defer="1">';
-    foreach(@_) {
+    foreach(@fields) {
 	$output.="\nHTMLArea.replace('$_');";
     }
-    $output.="\n</script>";
+    $output.="\nwindow.status='Activated Editfields';\n</script>";
     return $output;
 }