--- loncom/interface/lonfeedback.pm	2002/05/29 18:26:22	1.27
+++ loncom/interface/lonfeedback.pm	2002/09/10 21:06:22	1.30
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.27 2002/05/29 18:26:22 stredwic Exp $
+# $Id: lonfeedback.pm,v 1.30 2002/09/10 21:06:22 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -53,6 +53,8 @@ use Apache::loncommon();
 
 sub mail_screen {
   my ($r,$feedurl,$options) = @_;
+  my $bodytag=&Apache::loncommon::bodytag('Resource Feedback and Discussion',
+                                          '','onLoad="window.focus();"');
   $r->print(<<ENDDOCUMENT);
 <html>
 <head>
@@ -100,9 +102,7 @@ sub mail_screen {
     }
 </script>
 </head>
-<body bgcolor="#FFFFFF" onLoad="window.focus();">
-<img align=right src=/adm/lonIcons/lonlogos.gif>
-<h1>Feedback</h1>
+$bodytag
 <h2><tt>$feedurl</tt></h2>
 <form action="/adm/feedback" method=post name=mailform>
 <input type=hidden name=postdata value="$feedurl">
@@ -399,9 +399,8 @@ sub handler {
                      $ENV{'course.'.$ENV{'request.course.id'}.'.domain'},
 		     $ENV{'course.'.$ENV{'request.course.id'}.'.num'});
 
-    &redirect_back($r,'/res/'.$url,'Changed discussion status<p>','0');
-
-      
+    &redirect_back($r,&Apache::lonnet::clutter($url),
+       'Changed discussion status<p>','0');
   } else {
 # ------------------------------------------------------------- Normal feedback
   my $feedurl=$ENV{'form.postdata'};
@@ -487,7 +486,3 @@ sub handler {
 
 1;
 __END__
-
-
-
-
