loncom/interface/lonfeedback.pm - diff

Return to lonfeedback.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.28, 2002/07/24 19:57:38	version 1.29, 2002/08/26 12:47:28
Line 53 use Apache::loncommon();	Line 53 use Apache::loncommon();

sub mail_screen {	sub mail_screen {
my ($r,$feedurl,$options) = @_;	my ($r,$feedurl,$options) = @_;
	my $bodytag=&Apache::loncommon::bodytag('Resource Feedback and Discussion',
	'','onLoad="window.focus();"');
$r->print(<<ENDDOCUMENT);	$r->print(<<ENDDOCUMENT);
<html>	<html>
<head>	<head>
Line 100 sub mail_screen {	Line 102 sub mail_screen {
}	}
</script>	</script>
</head>	</head>
<body bgcolor="#FFFFFF" onLoad="window.focus();">	$bodytag
<img align=right src=/adm/lonIcons/lonlogos.gif>
<h1>Resource Feedback and Discussion</h1>
<h2><tt>$feedurl</tt></h2>	<h2><tt>$feedurl</tt></h2>
<form action="/adm/feedback" method=post name=mailform>	<form action="/adm/feedback" method=post name=mailform>
<input type=hidden name=postdata value="$feedurl">	<input type=hidden name=postdata value="$feedurl">
Line 487 sub handler {	Line 487 sub handler {

1;	1;
__END__	__END__