X-Git-Url: http://git.rot13.org/?p=google-map-tiles.git;a=blobdiff_plain;f=tiles.pl;h=4a11d758b75bf86f0cb231f2631675e14aa506e5;hp=e855ba92f9483a987a5f1fed5e1044dd659baa7a;hb=071c17d502d4be0bb7990c52717ad1b82256290d;hpb=3f7cce9f28645b2a3b5d277d53701043cd747c3d

diff --git a/tiles.pl b/tiles.pl
index e855ba9..4a11d75 100755
--- a/tiles.pl
+++ b/tiles.pl
@@ -195,7 +195,8 @@ while ( my ($zoom,$tilex,$tiley) = $sth->fetchrow_array )
  {
   $ix = $lngpix - $left - $xiconoff ;			# Remove half image size
   $iy = $latpix - $top - $yiconoff ;			# Remove half image size
-  $im->copy($imicon,$ix,$iy,0,0,$xiconpix,$yiconpix) ;
+#  $im->copy($imicon,$ix,$iy,0,0,$xiconpix,$yiconpix) ;
+  $im->copyMerge($imicon,$ix,$iy,0,0,$xiconpix,$yiconpix,50) ;
  }
 
  open(my $PNG, '>', $file) || die "$file: $!";