X-Git-Url: http://git.rot13.org/?p=keramika-neolitik;a=blobdiff_plain;f=csv2js.pl;h=cdba38bb90662c8981552ca0630e7ae89279b82c;hp=5d9debf1f9470541dc5ac1cb25e213d6cc087180;hb=HEAD;hpb=c86618f08341b69decd3ced90960cdc9720e612b diff --git a/csv2js.pl b/csv2js.pl index 5d9debf..cdba38b 100755 --- a/csv2js.pl +++ b/csv2js.pl @@ -28,9 +28,10 @@ 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}; + system qq{convert $source -fill white -draw "color 1,1 floodfill" -scale 100x100 -gravity center -gravity south -background white -extent 100x100 $thumb}; $i->{image} = $image; $i->{thumbnail} = $thumb; # $i->{label} = $i->{opis_predmeta};