--- loncom/interface/lonfeedback.pm 2002/05/29 18:26:22 1.27 +++ loncom/interface/lonfeedback.pm 2002/08/26 12:47:28 1.29 @@ -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.29 2002/08/26 12:47:28 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(< @@ -100,9 +102,7 @@ sub mail_screen { } - - -

Feedback

+$bodytag

$feedurl

@@ -487,7 +487,3 @@ sub handler { 1; __END__ - - - -