1 <& /elements/init_overlib.html &>
5 <& /elements/popup_link.html,
6 'action' => $p. 'view/map.html?'. $query,
8 'actionlabel' => $js_name,
15 <& /elements/popup_link.html,
16 'action' => $p. "view/directions.html?origin=$origin;". $query,
17 'label' => mt('directions'),
18 'actionlabel' => $js_name,
26 <A HREF="<%$p%>view/kml.cgi?<% $query %>"><% mt('earth') |h %></A>
31 my ($latitude, $longitude, $name, $agentnum);
34 $latitude = $opt{latitude};
35 $longitude = $opt{longitude};
37 $agentnum = $opt{agentnum};
39 ($latitude, $longitude, $name, $agentnum) = @_;
42 my $query = 'name='. uri_escape_utf8($name).
47 $js_name =~ s/[<>"']/ /g;
48 $m->interp->apply_escapes($js_name, 'js_string');
52 my $conf = new FS::Conf;
53 my $apikey = $conf->config('google_maps_api_key');
56 my @origin = $opt{company_address}
57 ? @{ $opt{company_address} }
58 : $conf->config('company_address', $agentnum);
59 my $origin = uri_escape(join(',', @origin));