[LON-CAPA-cvs] cvs: loncom /xml londefdef.pm

[albertel]

albertel		Thu Apr 15 13:37:04 2004 EDT

  Modified files:              
    /loncom/xml	londefdef.pm 
  Log:
  - apparently the Image:Magick that ships with 7.3 has a broken Ping command, sigh.
    BUG#2864
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.208 loncom/xml/londefdef.pm:1.209
--- loncom/xml/londefdef.pm:1.208	Tue Apr  6 14:05:29 2004
+++ loncom/xml/londefdef.pm	Thu Apr 15 13:37:04 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.208 2004/04/06 18:05:29 sakharuk Exp $
+# $Id: londefdef.pm,v 1.209 2004/04/15 17:37:04 albertel Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -2343,7 +2343,9 @@
 	    &image_replication($src);
 	    if (-e $src) {
 		my $image = Image::Magick->new;
-		my ($width, $height, $size, $format) = $image->Ping($src);
+		$image->Read($src);
+		my ($width, $height) = ($image->Get('width'),
+					$image->Get('height'));
 		if ($width && $height) {
 		    $token->[2]{'width'} =$width;
 		    $token->[2]{'height'}=$height;