diff -Naur perl_lib/EPrints/Plugin/Convert/ImageMagick/ThumbnailImages.pm perl_lib.20070518/EPrints/Plugin/Convert/ImageMagick/ThumbnailImages.pm --- perl_lib/EPrints/Plugin/Convert/ImageMagick/ThumbnailImages.pm 2007-05-18 11:44:18.000000000 +0100 +++ perl_lib.20070518/EPrints/Plugin/Convert/ImageMagick/ThumbnailImages.pm 2007-05-18 11:44:06.000000000 +0100 @@ -88,7 +88,14 @@ my $fn = "$size.png"; - system($convert, "-thumbnail","$geom>", $src."[$geom]", $dir . '/' . $fn); + # RM Handle multi-page tiffs (create thumbnail out of 1st page) + my $format = `file -bi $src`; + chomp $format; + if($format eq "image/tiff"){ + system($convert, "-thumbnail","$geom>", $src."[0]", $dir . '/' . $fn); + }else{ + system($convert, "-thumbnail","$geom>", $src."[$geom]", $dir . '/' . $fn); + } unless( -e "$dir/$fn" ) { return ();