--- a/s4-funcs.sh	Sun Oct 23 23:31:46 2016 +0859
+++ b/s4-funcs.sh	Mon Oct 24 09:11:28 2016 +0859
@@ -1506,7 +1506,7 @@
 	<div class="fr">
 	<form action="$myname">$auth
 	<input type="text" name="kwd" value="" title="$help"
-	 placeholder=" $placeholder " width="10">
+	 placeholder=" $placeholder " width="10" accesskey="k">
 	<input type="hidden" name="stage" value="searchart">
 	</form>
 	</div>
@@ -1653,7 +1653,7 @@
   shortval=${dumpcollen:+"substr(val, 0, $dumpcollen)"}
   shortval=${shortval:-val}
 
-   # The m.aid in the next line is suspicious.  But works fine in SQLite3...
+  # The m.aid in the next line is suspicious.  But works fine in SQLite3...
   DT_SQL="SELECT b.rowid || '#' || m.aid LINK,
        ctime,
        (SELECT $shortval FROM blog_s WHERE key='title' AND id=b.id) title,
@@ -1687,7 +1687,7 @@
 EOF
 
   cat<<-EOF
-	`cgi_radio foldtabs yes id="mre"`<label
+	`cgi_radio foldtabs yes 'id="mre" accesskey="d"'`<label
 	 for="mre">最近の書き込み先</label>
 	<div class="lcto">
 	`DT_VIEW=replyblog dumptable html blog`
@@ -1715,7 +1715,7 @@
     err newcount=$cont
     if [ $cont -gt 0 ]; then
       #echo "全体の新着記事${cont}傑" | html h2
-      cgi_radio foldtabs yes 'id="new10"'
+      cgi_radio foldtabs yes 'id="new10" accesskey="f"'
       echo "<label for=\"new10\">新着${cont}傑</label><div>"
       cat<<-EOF | html form 'action="?home"'
 	`cgi_checkbox readchk yes 'id="read"'`<label