[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Tue, 14 Feb 2006 20:34:35 -0000
albertel Tue Feb 14 15:34:35 2006 EDT
Modified files:
/loncom/interface lonprintout.pm
Log:
- no longer using $number_of_columns in print_resources, just embedding
the string directly and letting latex_corrections fix it up, so eliminate
it from the call and argument list
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.421 loncom/interface/lonprintout.pm:1.422
--- loncom/interface/lonprintout.pm:1.421 Fri Feb 10 06:56:49 2006
+++ loncom/interface/lonprintout.pm Tue Feb 14 15:34:34 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Printout
#
-# $Id: lonprintout.pm,v 1.421 2006/02/10 11:56:49 foxr Exp $
+# $Id: lonprintout.pm,v 1.422 2006/02/14 20:34:34 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1418,8 +1418,7 @@
$person,$type,
\%moreenv,\@master_seq,
$flag_latex_header_remove,
- $LaTeXwidth,
- $number_of_columns);
+ $LaTeXwidth);
$resources_printed .= ":";
$print_array[$i].=$output;
$student_names[$i].=$person.':'.$fullname.'_END_';
@@ -1725,7 +1724,7 @@
sub print_resources {
my ($r,$helper,$person,$type,$moreenv,$master_seq,$remove_latex_header,
- $LaTeXwidth,$number_of_columns)=@_;
+ $LaTeXwidth)=@_;
my $current_output = '';
my $printed = '';
my ($username,$userdomain,$usersection) = split /:/,$person;