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

[albertel]

albertel		Wed Feb 11 17:14:10 2004 EDT

  Modified files:              
    /loncom/interface	lonfeedback.pm 
  Log:
  
  - sets the http header  BUG#2723
  
  
  
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.75 loncom/interface/lonfeedback.pm:1.76
--- loncom/interface/lonfeedback.pm:1.75	Wed Jan 28 11:10:26 2004
+++ loncom/interface/lonfeedback.pm	Wed Feb 11 17:14:10 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.75 2004/01/28 16:10:26 albertel Exp $
+# $Id: lonfeedback.pm,v 1.76 2004/02/11 22:14:10 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -757,6 +757,8 @@
        &mt('Changed discussion status').'<br />','0','0');
   } elsif ($ENV{'form.preview'}) {
 # -------------------------------------------------------- User wants a preview
+      $r->content_type('text/html');
+      $r->send_http_header;
       &show_preview($r);
   } else {
 # ------------------------------------------------------------- Normal feedback