- Bugreport by the courtesy of Karel Zatloukal.
# print STDERR "Wuse $file\n";
Wrequire $file;
+ local $Exporter::ExportLevel=$Exporter::ExportLevel+1;
$file->import(@list);
1;
}
my $file=img_src $file_base;
my($width,$height)=Image::Size::imgsize($file);
+ $alt=~s/<[^>]*>//g;
$alt=CGI::escapeHTML($alt);
return "<img src=\"$file\" alt=\"$alt\" title=\"$alt\" ".img_size($width,$height)
.(!$attrs ? "" : " ".$attrs)." />";