version 1.2, 2002/07/17 15:45:49
|
version 1.4, 2002/08/19 21:40:55
|
Line 35 if (not (-d $dirprefix . "png/"))
|
Line 35 if (not (-d $dirprefix . "png/"))
|
{ die "Can't convert help graphics because the png directory is not ". |
{ die "Can't convert help graphics because the png directory is not ". |
"installed."; } |
"installed."; } |
|
|
mkdir $dirprefix . "gif/"; |
mkdir $dirprefix . "gif/", 0755; |
mkdir $dirprefix . "eps/"; |
mkdir $dirprefix . "eps/", 0755; |
|
|
|
my $convert = `which convert`; |
|
if ($convert eq '') |
|
{ |
|
open LOG, ">> WARNINGS"; |
|
print LOG "**** ERROR **** ImageMagick is not installed. You must install ImageMagick to use LON-CAPA. Please see your installation instructions.\n"; |
|
print "**** ERROR **** ImageMagick is not installed. You must install ImageMagick to use LON-CAPA. Please see your installation instructions.\n"; |
|
exit; |
|
} |
|
|
foreach my $file (glob($dirprefix . "png/*.png")) |
foreach my $file (glob($dirprefix . "png/*.png")) |
{ |
{ |