version 1.430, 2006/03/15 16:17:53
|
version 1.431, 2006/03/15 22:11:04
|
Line 1023 sub output_data {
|
Line 1023 sub output_data {
|
my %parmhash = %$rparmhash; |
my %parmhash = %$rparmhash; |
my $resources_printed = ''; |
my $resources_printed = ''; |
my $html=&Apache::lonxml::xmlbegin(); |
my $html=&Apache::lonxml::xmlbegin(); |
my $bodytag=&Apache::loncommon::bodytag('Preparing Printout'); |
my $headtag = &Apache::loncommon::headtag('Preparing Printout'); |
|
my $end_headtag = &Apache::loncommon::endheadtag(); |
|
my $bodytag = &Apache::loncommon::bodytag('Preparing Printout'); |
$r->print(<<ENDPART); |
$r->print(<<ENDPART); |
$html |
$html |
<head> |
$headtag |
<script type="text/javascript" language="Javascript"> |
<script type="text/javascript" language="Javascript"> |
var editbrowser; |
var editbrowser; |
function openbrowser(formname,elementname,only,omit) { |
function openbrowser(formname,elementname,only,omit) { |
Line 1051 $html
|
Line 1053 $html
|
editbrowser.focus(); |
editbrowser.focus(); |
} |
} |
</script> |
</script> |
<title>LON-CAPA output for printing</title> |
$end_headtag |
</head> |
|
$bodytag |
$bodytag |
<p> |
<p> |
Please stand by while processing your print request, this may take some time ... |
Please stand by while processing your print request, this may take some time ... |
Line 1770 ENDPART
|
Line 1771 ENDPART
|
"cgi.$identifier.coursedom" => $cdom, |
"cgi.$identifier.coursedom" => $cdom, |
"cgi.$identifier.resources" => $resources_printed); |
"cgi.$identifier.resources" => $resources_printed); |
|
|
$r->print(<<FINALEND); |
my $end_page = &Apache::loncommon::end_page(); |
|
$r->print(<<FINALEND); |
<br /> |
<br /> |
<meta http-equiv="Refresh" content="0; url=/cgi-bin/printout.pl?$identifier" /> |
<meta http-equiv="Refresh" content="0; url=/cgi-bin/printout.pl?$identifier" /> |
<a href="/cgi-bin/printout.pl?$identifier">Continue</a> |
<a href="/cgi-bin/printout.pl?$identifier">Continue</a> |
</body> |
$end_page |
</html> |
|
FINALEND |
FINALEND |
} |
} |
|
|