X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Fbin%2Flist.cgi;h=edfc81b31622caf87decd2c5d55a3e1580c6d67c;hb=d8b9c414c328fffc1c2bd39d452e6f5922c2c78c;hp=0b391dfcacb88848a790e382f3e302052ada0803;hpb=32deb5f9dfef1be20b8ffd96898f06c5448d7604;p=clearscm.git

diff --git a/maps/bin/list.cgi b/maps/bin/list.cgi
index 0b391df..edfc81b 100755
--- a/maps/bin/list.cgi
+++ b/maps/bin/list.cgi
@@ -67,11 +67,13 @@ sub Body {
   print start_div {-class  => "toolbar",
                    -align  => "center"};
   my $prev_button = $prev >= 0 ?
-    a ({-href => "list.cgi?type=$type;next=$prev"},
-      "<img src=/maps/images/previous.gif border=0 alt=Previous align=middle>") : "";
+    a ({-href      => "list.cgi?type=$type;next=$prev",
+        -accesskey => 'p',
+    }, "<img src=/maps/images/previous.gif border=0 alt=Previous align=middle>") : "";
   my $next_button = ($next + $lines) < $total ?
-    a {-href => "list.cgi?type=$type;next=" . ($next + $lines)},
-      "<img src=/maps/images/next.gif border=0 alt=Next align=middle>" : "";
+    a {-href      => "list.cgi?type=$type;next=" . ($next + $lines),
+       -accesskey => 'n',
+    }, "<img src=/maps/images/next.gif border=0 alt=Next align=middle>" : "";
   print $prev_button,
     submit ({-name    => "action",
              -value   => "Add New Entry",