--- rat/lonpage.pm 2003/04/18 01:20:25 1.50
+++ rat/lonpage.pm 2003/09/22 03:02:06 1.53
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Page Handler
#
-# $Id: lonpage.pm,v 1.50 2003/04/18 01:20:25 www Exp $
+# $Id: lonpage.pm,v 1.53 2003/09/22 03:02:06 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -145,9 +145,9 @@ sub handler {
if ($r->header_only) {
if ($ENV{'browser.mathml'}) {
- $r->content_type('text/xml');
+ &Apache::loncommon::content_type($r,'text/xml');
} else {
- $r->content_type('text/html');
+ &Apache::loncommon::content_type($r,'text/html');
}
$r->send_http_header;
return OK;
@@ -331,20 +331,20 @@ sub handler {
}
}
unless ($contents) {
- $r->content_type('text/html');
+ &Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
- $r->print('Empty page.');
+ $r->print(''.&mt('Empty page').'.');
} else {
# ------------------------------------------------------------------ Build page
# ---------------------------------------------------------------- Send headers
unless ($target eq 'tex') {
if ($isxml) {
- $r->content_type('text/xml');
+ &Apache::loncommon::content_type($r,'text/xml');
$r->send_http_header;
$r->print($xmlheader);
} else {
- $r->content_type('text/html');
+ &Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
$r->print('');
}
@@ -360,7 +360,11 @@ sub handler {
if ($isxml) {
$r->print($xmlbody);
} else {
- $r->print('');
+ $r->print(
+ ''.
+ &Apache::lonmenu::menubuttons(undef,$target,1)
+ );
}
# ------------------------------------------------------------------ Start form
if ($nforms) {
@@ -410,15 +414,18 @@ sub handler {
&Apache::lonnet::declutter($hash{'src_'.$rid});
$metainfo.=
''.
+# '&command=submission" target="LONcatInfo">'.
+ '&command=submission">'.
'
'.
''.
''.
+# '&command=gradingmenu" target="LONcatInfo">'.
+ '&command=gradingmenu">'.
'
'.
''.
''.
+# '" target="LONcatInfo">'.
+ '" >'.
'
'.
'';
}