Mercurial > hgrepos > hgweb.cgi > s4

changeset 606:00837fdf1120

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Search form method changed to GET from POST
author HIROSE Yuuji <yuuji@gentei.org>
date Mon, 13 Apr 2020 08:48:13 +0900
parents 3b614fa74617
children d0068e9e6bd7
files s4-cgi.sh s4-funcs.sh
diffstat 2 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/s4-cgi.sh	Mon Apr 13 08:27:52 2020 +0900
+++ b/s4-cgi.sh	Mon Apr 13 08:48:13 2020 +0900
@@ -3,10 +3,11 @@
 #
 cgi_form() {
   # $1=stage
+  # $METHOD := method, defaults to "POST"
   : ${myname:?'Sure to set $myname to this script name'}
   cont=`cat`
   cat<<EOF
-<form action="$myname" method="POST" enctype="multipart/form-data">
+<form action="$myname" method="${METHOD:-POST}" enctype="multipart/form-data">
 $cont
 <input type="hidden" name="stage" value="$1">
 <input type="submit" value="送信">
--- a/s4-funcs.sh	Mon Apr 13 08:27:52 2020 +0900
+++ b/s4-funcs.sh	Mon Apr 13 08:48:13 2020 +0900
@@ -2176,6 +2176,7 @@
 ## err LE:sql.1="$sql"
   total=`query "with x as ($sql) select count(*) from x;"`
   echo "${entity} 一覧" | html h2
+  METHOD=GET
   if [ $total -gt $limit ]; then
     echo '<div class="right">'
     cgi_form $stage <<EOF
@@ -2188,7 +2189,7 @@
 	`cgi_hidden kwd \"$kwd\"`
 	`cgi_hidden stage \"$stage\"`"
   cat<<EOF
-  <form action="$myname" method="POST">
+  <form action="$myname" method="$METHOD">
   <p>${total}件中の<input class="hidesub" type="text" name="start"
   value="$((offset+1))" size="3">件めから${kwd:+" - 検索語: $kwd"}$hiddens
   <input type="submit" value="確定"></p>
@@ -2197,7 +2198,7 @@
   if [ $((offset+limit)) -lt $total ]; then
     nextbtn=$(
     cat<<EOF
-<div class="right clear"><form action="$myname" method="POST">
+<div class="right clear"><form action="$myname" method="$METHOD">
 `cgi_submit 次の${limit}件`
 $hiddens
 `cgi_hidden offset $((offset + limit))`</form></div>
@@ -2207,7 +2208,7 @@
   if [ $offset -gt 0 ]; then
     prevbtn=$(
     cat<<EOF
-<form action="$myname" method="POST">
+<form action="$myname" method="$METHOD">
 `cgi_submit 前の${limit}件`
 $hiddens
 `cgi_hidden offset $((offset - limit))`</form>

yatex.org