From: Sergey Matveev <stargrave@stargrave.org>
Date: Sun, 20 Sep 2020 09:13:31 +0000 (+0300)
Subject: Do not loss accesskeys
X-Git-Url: http://www.git.stargrave.org/?p=dotfiles.git;a=commitdiff_plain;h=b9825b714a2740b7974c42a9f578d3928293ba8d

Do not loss accesskeys
---

diff --git a/bin/bin/texinavfix.pl b/bin/bin/texinavfix.pl
index b82a85e..69953f5 100755
--- a/bin/bin/texinavfix.pl
+++ b/bin/bin/texinavfix.pl
@@ -12,13 +12,13 @@ while(<STDIN>){
     if(/^<div class="header">$/){
         print "$_<center><p>";
         if(defined $rels{"prev"}){
-            print "<a href=\"$rels{'prev'}\">[&lt;&lt;&lt;]</a>";
+            print "<a href=\"$rels{'prev'}\" accesskey=\"p\" rel=\"prev\">[&lt;&lt;&lt;]</a>";
         };
         if(defined $rels{"up"}){
-            print "<a href=\"$rels{'up'}\">[^^^]</a>";
+            print "<a href=\"$rels{'up'}\" accesskey=\"u\" rel=\"up\">[^^^]</a>";
         };
         if(defined $rels{"next"}){
-            print "<a href=\"$rels{'next'}\">[&gt;&gt;&gt;]</a>";
+            print "<a href=\"$rels{'next'}\" accesskey=\"n\" rel=\"next\">[&gt;&gt;&gt;]</a>";
         };
         $header++;
     };