s4: s4.cgi.m4 annotate

s4

Help for emphasizing notations

author	HIROSE Yuuji <yuuji@gentei.org>
date	Tue, 06 Feb 2018 11:22:51 +0900
parents
children	9cf0b6b7bb90

rev	line source
yuuji@89	1 `#'!m4_indir(`_SHELL_')
yuuji@89	2 # 愛
yuuji@89	3 m4_changequote(``,'')mydir=`dirname $0`
yuuji@89	4 . $mydir/s4-funcs.sh
yuuji@89	5
yuuji@89	6 cgiinit
yuuji@89	7 if [ -z "$guestonlymode" ]; then
yuuji@89	8 if [ x"$1" = x"reg" ]; then
yuuji@89	9 contenttype; echo
yuuji@89	10 regist $2
yuuji@89	11 putfooter
yuuji@89	12 exit
yuuji@89	13 fi
yuuji@89	14
yuuji@89	15 dologin
yuuji@89	16 fi
yuuji@89	17
yuuji@89	18 case ${SERVER_SOFTWARE} in
yuuji@89	19 bozohttp*) # Ugly workaround for bozohttpd, which can't send
yuuji@89	20 # two or more arguments.
yuuji@89	21 set -- `echo "$@"\|(IFS=+ read a b c d e f g; echo $a $b $c $d $e $f $g)`
yuuji@89	22 ;;
yuuji@89	23 esac
yuuji@89	24
yuuji@89	25 # err 1=$1 2=$2 3=$3 4=$4
yuuji@89	26 stage=`getpar stage`
yuuji@89	27 stage=${stage:-$1}
yuuji@89	28 case ${stage} in
yuuji@89	29 m4_sinclude(_CASE_)esac
yuuji@89	30
yuuji@89	31 putfooter