version 1.210, 2004/04/15 19:08:31
|
version 1.211, 2004/04/15 20:17:32
|
Line 2344 sub start_img {
|
Line 2344 sub start_img {
|
my $loc=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$nsrc); |
my $loc=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$nsrc); |
&image_replication($loc); |
&image_replication($loc); |
my ($iwidth,$iheight); |
my ($iwidth,$iheight); |
&Apache::lonnet::logthis("loc is $loc"); |
|
if (-e $loc) { |
if (-e $loc) { |
my $image = Image::Magick->new; |
my $image = Image::Magick->new; |
$image->Read($loc); |
$image->Read($loc); |