loncom/interface/printout.pl - diff

Return to printout.pl CVS log

Up to [LON-CAPA] / loncom / interface

version 1.146.4.1, 2010/08/26 08:32:58	version 1.146.4.2, 2011/03/04 16:53:06
Line 904 sub convert_figure {	Line 904 sub convert_figure {
$not_eps =~ s/^\s+//;	$not_eps =~ s/^\s+//;
$not_eps =~ s/\s+$//;	$not_eps =~ s/\s+$//;
$not_eps =~ s/ /\\ /g;	$not_eps =~ s/ /\\ /g;
	my $prettyname=$not_eps;
if ($advanced_role) {	if ($advanced_role) {
my $prettyname=$not_eps;
$prettyname=~s\|/home/([^/]+)/public_html\|/priv/$1\|;	$prettyname=~s\|/home/([^/]+)/public_html\|/priv/$1\|;
$prettyname=~s\|$perlvar{'lonDocRoot'}/\|/\|;	$prettyname=~s\|$perlvar{'lonDocRoot'}/\|/\|;
&Apache::lonhtmlcommon::Update_PrgWin('',\%prog_state,	&Apache::lonhtmlcommon::Update_PrgWin('',\%prog_state,
Line 928 sub convert_figure {	Line 928 sub convert_figure {
system("pdftops $not_eps $eps_f");	system("pdftops $not_eps $eps_f");
} else {	} else {
system("convert $not_eps $eps_f");	system("convert $not_eps $eps_f");
	if ($? and $advanced_role) {
	print '<p class="LC_warning">'
	.&mt('An error occured during the conversion of [_1].[_2]If possible try to save this image using different settings and republish it.',
	'<span class="LC_filename">'.$prettyname.'</span>','<br/>')
	.'</p>';
	}
}	}

if (not -e $eps_f) {	if (not -e $eps_f) {