summaryrefslogtreecommitdiff
path: root/www/p5-HTML-GoogleMaps/files/patch-lib__HTML__GoogleMaps.pm
blob: ebc11cb03f10e01b062fed71b6564d02715ed2b9 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
--- lib/HTML/GoogleMaps.pm.orig	2006-12-05 20:53:34.000000000 -0800
+++ lib/HTML/GoogleMaps.pm	2008-11-08 01:38:54.000000000 -0800
@@ -41,6 +41,8 @@
 
 =item width => width in pixels
 
+=item ua => UserAgent object used internally
+
 =back
 
 =back
@@ -155,7 +157,7 @@
     %opts,
     points => [],
     poly_lines => [],
-    geocoder => Geo::Coder::Google->new(apikey => $opts{key}),
+    geocoder => Geo::Coder::Google->new(apikey => $opts{key}, ($opts{ua} ? (ua => $opts{ua}) : ())),
   }, $class;
 }