[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm printout.pl
albertel
lon-capa-cvs@mail.lon-capa.org
Thu, 06 May 2004 06:45:13 -0000
albertel Thu May 6 02:45:13 2004 EDT
Modified files:
/loncom/interface lonprintout.pm printout.pl
Log:
BUG#2956
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.299 loncom/interface/lonprintout.pm:1.300
--- loncom/interface/lonprintout.pm:1.299 Tue May 4 15:58:57 2004
+++ loncom/interface/lonprintout.pm Thu May 6 02:45:13 2004
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Printout
#
-# $Id: lonprintout.pm,v 1.299 2004/05/04 19:58:57 albertel Exp $
+# $Id: lonprintout.pm,v 1.300 2004/05/06 06:45:13 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1038,7 +1038,7 @@
}
my $flag_latex_header_remove = 'NO';
my %moreenv = ('textwidth' => &get_textwidth($helper,$LaTeXwidth));
- my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Print Status','Class Print Status',$num_todo,'inline');
+ my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Print Status','Class Print Status',$num_todo,'inline','75');
my $seed=time+($$<<16)+($$);
my @allcodes;
if ($old_name) {
Index: loncom/interface/printout.pl
diff -u loncom/interface/printout.pl:1.54 loncom/interface/printout.pl:1.55
--- loncom/interface/printout.pl:1.54 Fri Apr 23 15:47:38 2004
+++ loncom/interface/printout.pl Thu May 6 02:45:13 2004
@@ -1,7 +1,7 @@
#!/usr/bin/perl
# CGI-script to run LaTeX, dvips, ps2ps, ps2pdf etc.
#
-# $Id: printout.pl,v 1.54 2004/04/23 19:47:38 www Exp $
+# $Id: printout.pl,v 1.55 2004/05/06 06:45:13 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -89,7 +89,7 @@
close $temporary_file;
my $noteps;
my %prog_state;
- if ($adv) { %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('','Coverting Images to EPS','Picture Conversion Status',$#content_of_file,'inline'); }
+ if ($adv) { %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('','Coverting Images to EPS','Picture Conversion Status',$#content_of_file,'inline','75'); }
foreach $not_eps (@content_of_file) {
chomp($not_eps);
if ($not_eps ne '') {
@@ -151,7 +151,7 @@
my $ind=-1;
my %prog_state;
-if ($adv) { %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('','Print Status','Class Print Status',$number_of_files,'inline'); }
+if ($adv) { %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('','Print Status','Class Print Status',$number_of_files,'inline','75'); }
my $final_statement="<a href=\"$backref\"><b>Return</b></a> to last resource.<br /><br />Generated PDF File for:<br />";
foreach $texfile (@texfile) {
my $status_statement='';