# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1438639885 -32400
# Node ID cec40085a1d43b38ecfdc4b8f55b53f7dec79750
# Parent  d6b0d743fed3930fe5c70ae71d4bcd22a31d7b67
Seed for form of "select" now requires no values

diff -r d6b0d743fed3 -r cec40085a1d4 s4-funcs.sh
--- a/s4-funcs.sh	Tue Aug 04 07:01:11 2015 +0900
+++ b/s4-funcs.sh	Tue Aug 04 07:11:25 2015 +0900
@@ -2239,9 +2239,9 @@
 	;;
       [Ss][Ee][Ll][Ee][Cc][Tt])
 	fh="<select name=\"$name\">$nl"
-	form="`echo $args|sed -e \
-'s,\([^=][^=]*\)=\([^= ][^= ]*\),<option value=\"\2\">\1</option>,g'`"
-
+	form=$(for l in $args; do
+		 echo "<option value=\"${l#*=}\">${l%=*}</option>" 
+	       done)
 	if [ -n "$val" ]; then
 	  form=`echo $form|sed -e "s,\(value=.$val.\),\\1 selected,"`
 	fi