From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sun, 3 Apr 2011 20:49:53 +0000 (+0200)
Subject: merge icons 50% to better represent overlaping ones
X-Git-Url: http://git.rot13.org/?p=google-map-tiles.git;a=commitdiff_plain;h=071c17d502d4be0bb7990c52717ad1b82256290d;hp=3f7cce9f28645b2a3b5d277d53701043cd747c3d

merge icons 50% to better represent overlaping ones
---

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: $!";