version 1.142.6.1, 2009/09/27 03:13:06
|
version 1.144, 2009/09/27 02:47:11
|
Line 178 my %perlvar=%{&LONCAPA::Configuration::r
|
Line 178 my %perlvar=%{&LONCAPA::Configuration::r
|
&Apache::lonlocal::get_language_handle(); |
&Apache::lonlocal::get_language_handle(); |
&Apache::loncommon::content_type(undef,'text/html'); |
&Apache::loncommon::content_type(undef,'text/html'); |
$env{'request.noversionuri'} = '/cgi-bin/printout.pl'; |
$env{'request.noversionuri'} = '/cgi-bin/printout.pl'; |
print(&Apache::loncommon::start_page('Creating PDF')); |
# Breadcrumbs |
|
#FIXME: Choose better/different breadcrumbs?!? Links? |
|
my $brcrum = [{'href' => '', |
|
'text' => 'Helper'}, #FIXME: Different origin possible than print out helper? |
|
{'href' => '', |
|
'text' => 'Preparing Printout'}, |
|
{'href' => '', |
|
'text' => 'Creating PDF'}]; |
|
print(&Apache::loncommon::start_page('Creating PDF', |
|
undef, |
|
{'bread_crumbs' => $brcrum,})); |
|
|
my $identifier = $ENV{'QUERY_STRING'}; |
my $identifier = $ENV{'QUERY_STRING'}; |
my $texfile = $env{'cgi.'.$identifier.'.file'}; |
my $texfile = $env{'cgi.'.$identifier.'.file'}; |