X-Git-Url: http://git.rot13.org/?p=keramika-neolitik;a=blobdiff_plain;f=csv2js.pl;h=a1fa2d3365e8be5ec0d6c94e62c2fb6171a82ba9;hp=5d9debf1f9470541dc5ac1cb25e213d6cc087180;hb=e29d9bdc59255ec5fefa317c37d26cf95ffd014c;hpb=15d3457226e701fca52b4ad9f1dbfad5cbe90782 diff --git a/csv2js.pl b/csv2js.pl index 5d9debf..a1fa2d3 100755 --- a/csv2js.pl +++ b/csv2js.pl @@ -28,7 +28,8 @@ foreach my $i ( @$aoh ) { next; } - system "convert -trim -geometry 400x $source $image"; + #system "convert -trim -geometry 400x $source $image"; + system qq{convert -fill white -draw "color 1,1 floodfill" -trim -geometry 400x $source $image}; #system "convert $image -scale 100x100 -gravity center -background white -extent 100x100 $thumb"; system qq{convert $source -fill white -draw "color 1,1 floodfill" -scale 100x100 -gravity center -background white -extent 100x100 $thumb}; $i->{image} = $image;