]> mj.ucw.cz Git - gallery.git/commitdiff
Little improvements to GeoHack
authorMartin Mares <mj@ucw.cz>
Mon, 3 Feb 2014 13:06:12 +0000 (14:06 +0100)
committerMartin Mares <mj@ucw.cz>
Sun, 8 Feb 2015 20:14:18 +0000 (21:14 +0100)
gal/UCW/Gallery/Web/HighSlide.pm

index 585b111a2dc6f2f63e8aab22c7147d8f1efda9ea..b1e503b261874f29f79f6d6bc023912a111d3835 100644 (file)
@@ -69,8 +69,9 @@ sub show_thumb($) {
        if ($self->get('GeoHack')) {
                my ($lat, $lon) = ($m->{lat}, $m->{lon});
                if (defined $lat && defined $lon) {
-                       my $cap = "<a href='http://www.openstreetmap.org/?mlat=$lat&amp;mlon=$lon#map=16/$lat/$lon'>Ukázat na mapě</a>";
-                       print "<div class='highslide-caption'>$cap</div>\n";
+                       my $local = "<a href='map.cgi?i=" . $self->{hs_thumb_counter} . "'>trasa</a>";
+                       my $osm = "<a href='http://www.openstreetmap.org/?mlat=$lat&amp;mlon=$lon#map=16/$lat/$lon'>OSM</a>";
+                       print "<div class='highslide-caption'>Ukázat na mapě: $local, $osm</div>\n";
                }
        }
 }