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__ |
|
|
|
|
|
|
|
|