projects
/
keramika-neolitik
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
15d3457
)
white background on pop-up pictures
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Sat, 23 Jan 2021 11:06:53 +0000
(12:06 +0100)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Sat, 23 Jan 2021 11:06:53 +0000
(12:06 +0100)
csv2js.pl
patch
|
blob
|
history
diff --git
a/csv2js.pl
b/csv2js.pl
index
5d9debf
..
a1fa2d3
100755
(executable)
--- a/
csv2js.pl
+++ b/
csv2js.pl
@@
-28,7
+28,8
@@
foreach my $i ( @$aoh ) {
next;
}
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;
#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;