--- loncom/homework/randomlylabel.pm 2002/12/16 14:41:15 1.4 +++ loncom/homework/randomlylabel.pm 2003/01/23 18:26:10 1.5 @@ -2,7 +2,7 @@ # The LearningOnline Network with CAPA # randomlabel.png: composite together text and images into 1 image # -# $Id: randomlylabel.pm,v 1.4 2002/12/16 14:41:15 matthew Exp $ +# $Id: randomlylabel.pm,v 1.5 2003/01/23 18:26:10 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -39,7 +39,7 @@ use GD; sub get_image { my ($imgsrc,$set_trans)=@_; my $image; - if ($imgsrc !~ /\.(png|jpg|jpeg)$/) { + if ($imgsrc !~ /\.(png|jpg|jpeg)$/i) { my $conv_image = Image::Magick->new; my $current_figure = $conv_image->Read('filename'=>$imgsrc); $conv_image->Set('magick'=>'png');