[LON-CAPA-cvs] cvs: loncom /interface lonfeedback.pm

Tue, 01 Jun 2004 21:40:58 -0000

www		Tue Jun  1 17:40:58 2004 EDT

  Modified files:              
    /loncom/interface	lonfeedback.pm 
  Log:
  Bringing up HTMLArea. Doesn't appear to be working, though:
  
  * Preview button is kaputt (but could be disabled if HTMLArea is active)
  * Doesn't even seem to post discussions
  
  Stay tuned.
  
  
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.84 loncom/interface/lonfeedback.pm:1.85

--- loncom/interface/lonfeedback.pm:1.84	Tue May 25 18:16:05 2004
+++ loncom/interface/lonfeedback.pm	Tue Jun  1 17:40:57 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.84 2004/05/25 22:16:05 raeburn Exp $
+# $Id: lonfeedback.pm,v 1.85 2004/06/01 21:40:57 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -457,13 +457,15 @@
           $prevtag = '<input type="hidden" name="previous" value="'.$ENV{'form.previous'}.'" />';
       }
   }
-  my $latexHelp = Apache::loncommon::helpLatexCheatsheet();
+  my $latexHelp=&Apache::loncommon::helpLatexCheatsheet();
+  my $htmlheader=&Apache::lonhtmlcommon::htmlareaheaders(); 
   my $send=&mt('Send');
   $r->print(<<ENDDOCUMENT);
 <html>
 <head>
 <title>The LearningOnline Network with CAPA</title>
 <meta http-equiv="pragma" content="no-cache"></meta>
+$htmlheader
 <script type="text/javascript">
 //<!--
     function gosubmit() {
@@ -534,7 +536,9 @@
 </p>
 </form>
 ENDDOCUMENT
-$r->print(&generate_preview_button().'</body></html>');
+$r->print(&generate_preview_button().
+&Apache::lonhtmlcommon::htmlareaactive().
+'</body></html>');
 }
 
 sub fail_redirect {



