Mercurial > hgrepos > hgweb.cgi > s4

changeset 341:bad68ea6c30a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add more accesskeys
author HIROSE Yuuji <yuuji@gentei.org>
date Mon, 24 Oct 2016 09:41:10 +0859
parents a06cd57df83a
children 385b3174d265
files examples/common/default/home.m4.html examples/common/default/html.m4.html s4-blog.sh s4-funcs.sh
diffstat 4 files changed, 27 insertions(+), 24 deletions(-) [+]
line wrap: on
line diff
--- a/examples/common/default/home.m4.html	Mon Oct 24 09:11:28 2016 +0859
+++ b/examples/common/default/home.m4.html	Mon Oct 24 09:41:10 2016 +0859
@@ -6,12 +6,13 @@
 </div>
 
 <div class="foldtabs">
-<input type="radio" id="sd" name="foldtabs" accesskey="a"><label for="sd">日記(_NBLOG_)</label>
+<input type="radio" id="sd" name="foldtabs"><label
+ accesskey="a" title="A" for="sd">日記(_NBLOG_)</label>
 <div><!-- in home.m4 -->_BLOGS_</div><!-- in home.m4 -->
 
 
-<input type="radio" id="grp" name="foldtabs" accesskey="s"><label
- for="grp">参加中グループ</label>
+<input type="radio" id="grp" name="foldtabs"><label
+ accesskey="s" title="S" for="grp">参加中グループ</label>
 <div> <!-- div.fold hides this div (in home.m4.html) -->
 <div class="dumptable">
 _GROUPS_
@@ -20,6 +21,6 @@
 
 _HOMETAIL_
 
-<input type="radio" id="close" name="foldtabs" accesskey="x"><label
-for="close">×</label>
+<input type="radio" id="close" name="foldtabs"><label
+ accesskey="x" title="X" for="close">×</label>
 </div> <!--  end of fold (in home.m4.html) -->
--- a/examples/common/default/html.m4.html	Mon Oct 24 09:11:28 2016 +0859
+++ b/examples/common/default/html.m4.html	Mon Oct 24 09:41:10 2016 +0859
@@ -11,12 +11,12 @@
 <body class="_BODYCLASS_">
 <div class="topmenu">
 <ul>
- <li><a href="?home">ホーム</a></li>
+ <li><a href="?home" accesskey="1">ホーム</a></li>
  <!-- <li><a href="?blog">話題作成</a></li> -->
- <li><a href="?mems">参加者一覧</a></li>
- <li><a href="?grps">グループ一覧</a></li>
- <li><a href="?invite">招待</a></li>
- <li><a href="?login">再ログイン</a></li>
+ <li><a href="?mems" accesskey="2">参加者一覧</a></li>
+ <li><a href="?grps" accesskey="3">グループ一覧</a></li>
+ <li><a href="?invite" accesskey="4">招待</a></li>
+ <li><a href="?login" accesskey="5">再ログイン</a></li>
  <!-- <li><a href="?userconf">userconf</a></li> -->
 </ul>
 </div>
--- a/s4-blog.sh	Mon Oct 24 09:11:28 2016 +0859
+++ b/s4-blog.sh	Mon Oct 24 09:41:10 2016 +0859
@@ -112,12 +112,12 @@
 <table class="bloghead">
 EOF
 
-  href="<a href=\"?editheading+$rowid\"> 編集 </a>"
+  href="<a href=\"?editheading+$rowid\" accesskey=\"e\" title=\"E\"> 編集 </a>"
   if $iswritable; then
-    href2="<a href=\"?lshandout+$rowid\"> 提出状況 </a>"
-    href3="(<a href=\"?gethandout+$rowid\">ファイル取得</a>)"
+    href2="<a href=\"?lshandout+$rowid\" accesskey=\"l\" title=\"L\"> 提出状況 </a>"
+    href3="(<a href=\"?gethandout+$rowid\" accesskey=\"f\" title=\"F\">ファイル取得</a>)"
   fi
-  href4='<a href="#bottom"> 末尾へ</a>'
+  href4='<a href="#bottom" accesskey="b" title="B"> 末尾へ</a>'
 
   query<<-EOF |
 	SELECT coalesce((SELECT "yes" FROM blog
@@ -265,8 +265,8 @@
   done
 
   textform='<div class="fold">
-<input type="checkbox" id="cmt" checked><label for="cmt"
->コメントする</label><div>
+<input type="checkbox" id="cmt" checked><label
+ accesskey="c" title="C" for="cmt">コメントする</label><div>
 <table class="b">
 <tr><td><textarea name="text" cols="72" rows="4"></textarea></td></tr>
 <tr><td>添付ファイル:
@@ -278,8 +278,8 @@
   cat<<-EOF
 	</table> <!-- end of s4-blog:blog_showentry() main table -->
 	<p class="update_link"><a
-	 href="?reload/$rowid">再読込</a> / <a
-	 href="#title">先頭へ</a></p>
+	 href="?reload/$rowid" accesskey="r" title="R">再読込</a> / <a
+	 href="#title" accesskey="t" title="T">先頭へ</a></p>
 	EOF
   query<<-EOF
 	WITH mrt AS (
@@ -645,7 +645,8 @@
     subtitle="`gecos $owner` さんの話題"
   else
     grprowid=`query "select rowid from grp where gname=\"$owner\";"`
-    subtitle="グループ <a href=\"?grp+$grprowid\">$owner</a> での話題
+    subtitle="グループ
+     <a href=\"?grp+$grprowid\" accesskey=\"h\" title=\"H\">$owner</a> での話題
     	`query \"SELECT printf('(チーム:%s)', val)\
 		 FROM blog_s
 		 WHERE id=(SELECT id FROM blog WHERE rowid=$rowid)
--- a/s4-funcs.sh	Mon Oct 24 09:11:28 2016 +0859
+++ b/s4-funcs.sh	Mon Oct 24 09:41:10 2016 +0859
@@ -1597,8 +1597,9 @@
   cond="gname in (select gname from grp_mem where user='$uname')"
   search_form_args=""
   if [ x"$user" = x"$uname" ]; then
-    conflink="<a href=\"?userconf\">プロフィールの編集</a> /
-	<a href=\"?blog\">新規話題の作成</a>"
+    conflink="<a href=\"?userconf\" accesskey=\"e\"
+	 title=\"E\">プロフィールの編集</a> /
+	<a href=\"?blog\" accesskey=\"n\" title=\"N\">新規話題の作成</a>"
     # Display folders
     sql="select count(id) from article_m where id
 		 in (select id from article where author='$user')
@@ -1607,8 +1608,8 @@
     nfile=`query "$sql"`
     # err nfile=$nfile
     if [ $nfile -gt 0 ]; then
-      conflink="$conflink /
-	<a href=\"?lsmyfile\">過去の提出ファイル</a>"
+      conflink="$conflink / <a href=\"?lsmyfile\" accesskey=\"f\"
+       title=\"F\">過去の提出ファイル</a>"
     fi
   else
     search_form_args="author=$uname"
@@ -1688,7 +1689,7 @@
 
   cat<<-EOF
 	`cgi_radio foldtabs yes 'id="mre" accesskey="d"'`<label
-	 for="mre">最近の書き込み先</label>
+	 for="mre" title="D">最近の書き込み先</label>
 	<div class="lcto">
 	`DT_VIEW=replyblog dumptable html blog`
 	</div>

yatex.org