loncom/interface/printout.pl - diff

Return to printout.pl CVS log

Up to [LON-CAPA] / loncom / interface

version 1.159, 2014/02/28 19:20:06	version 1.161, 2016/01/28 19:37:42
Line 209 if ($student_names=~/_END_/) {	Line 209 if ($student_names=~/_END_/) {
@names_pack=split(/_ENDPERSON_/,$student_names);	@names_pack=split(/_ENDPERSON_/,$student_names);
}	}
if ($backref) {	if ($backref) {
print('<p>'.&mt("[_1]Return[_2] to editing resource.",	print('<p>'.&mt("[_1]Return[_2] to resource.",
"<a href=\"$backref\"><b>","</b></a>").'</p>');	"<a href=\"$backref\"><b>","</b></a>").'</p>');
	print('<p><a href="javascript:gopost(\'/adm/printout\',\''.$backref.'\');">'.
	&mt("Change Printing Options").'</a></p>'."\n");
}	}
my $figfile = $texfile;	my $figfile = $texfile;
$figfile =~ s/^(.*_printout)_\d+_\d+_\d+\.tex/$1\.dat/;	$figfile =~ s/^(.*_printout)_\d+_\d+_\d+\.tex/$1\.dat/;
Line 933 sub convert_figure {	Line 935 sub convert_figure {

# Spaces are problematic for system commands and LaTeX, replace with _	# Spaces are problematic for system commands and LaTeX, replace with _

$eps_f =~ s/ /\_/g;	$eps_f =~ s/ /\_/g;

#	#
# If the file is already an .eps or .ps file (eps_f still has the original	# If the file is already an .eps or .ps file (eps_f still has the original