Add links to previous and next galaxy

diff --git a/lib/NDWeb/Controller/Stats.pm b/lib/NDWeb/Controller/Stats.pm
index e28c2aeaecffa84d80f140ac5a8a9617f353b54d..4b227367ad6fc5ae8d2e4b5999b121c52ccdefd4 100644 (file)
--- a/lib/NDWeb/Controller/Stats.pm
+++ b/lib/NDWeb/Controller/Stats.pm
@@ -112,6 +112,21 @@ WHERE g.tick = ( SELECT max(tick) AS max FROM galaxies)
 
        $query->execute($x,$y,$z);
        $c->stash(planets => $query->fetchall_arrayref({}) );
+
+       $query = $dbh->prepare(q{
+WITH p AS (
+       SELECT x,y FROM galaxies
+       WHERE tick = tick() AND (x <= $1 AND y < $2 OR x < $1)
+       ORDER BY x DESC, y DESC LIMIT 1
+), n AS (
+       SELECT x,y FROM galaxies
+       WHERE tick = tick() AND (x >= $1 AND y > $2 OR x > $1)
+       ORDER BY x ASC, y ASC LIMIT 1
+)
+TABLE p UNION TABLE n
+               });
+       $query->execute($x,$y);
+       $c->stash(browse => $query->fetchall_arrayref({}) );
 }
 
 sub planet : Local {

diff --git a/root/src/stats/galaxy.tt2 b/root/src/stats/galaxy.tt2
index b66f74ed18945b4d9123d282566649d4b1765ccd..6c9e9b883c5c59829851dcad4a555766067f4d64 100644 (file)
--- a/root/src/stats/galaxy.tt2
+++ b/root/src/stats/galaxy.tt2
@@ -1,4 +1,7 @@
 [% META title = 'Galaxy stats' %]
+[% FOR b IN browse %]
+<a href="[% c.uri_for('galaxy',b.x,b.y) %]">[% b.x %]:[% b.y %]</a>
+[% END %]
 [% IF g %]
 [% PROCESS inc/stats.tt2 %]
 <div class="leftinfo">