version 1.432, 2006/03/21 18:43:49
|
version 1.433, 2006/03/23 22:32:10
|
Line 1022 sub output_data {
|
Line 1022 sub output_data {
|
my ($r,$helper,$rparmhash) = @_; |
my ($r,$helper,$rparmhash) = @_; |
my %parmhash = %$rparmhash; |
my %parmhash = %$rparmhash; |
my $resources_printed = ''; |
my $resources_printed = ''; |
my $html=&Apache::lonxml::xmlbegin(); |
my $js = <<ENDPART; |
my $headtag = &Apache::loncommon::headtag('Preparing Printout'); |
<script type="text/javascript"> |
my $end_headtag = &Apache::loncommon::endheadtag(); |
|
my $bodytag = &Apache::loncommon::bodytag('Preparing Printout'); |
|
$r->print(<<ENDPART); |
|
$html |
|
$headtag |
|
<script type="text/javascript" language="Javascript"> |
|
var editbrowser; |
var editbrowser; |
function openbrowser(formname,elementname,only,omit) { |
function openbrowser(formname,elementname,only,omit) { |
var url = '/res/?'; |
var url = '/res/?'; |
Line 1053 $headtag
|
Line 1047 $headtag
|
editbrowser.focus(); |
editbrowser.focus(); |
} |
} |
</script> |
</script> |
$end_headtag |
|
$bodytag |
|
<p> |
|
Please stand by while processing your print request, this may take some time ... |
|
</p> |
|
ENDPART |
ENDPART |
|
|
|
my $start_page = &Apache::loncommon::start_page('Preparing Printout',$js); |
|
my $msg = &mt('Please stand by while processing your print request, this may take some time ...'); |
|
|
|
$r->print($start_page."\n<p>\n$msg\n</p>\n"); |
|
|
# fetch the pagebreaks and store them in the course environment |
# fetch the pagebreaks and store them in the course environment |
# The page breaks will be pulled into the hash %page_breaks which is |
# The page breaks will be pulled into the hash %page_breaks which is |