1 home|"")

2 contenttype; echo

3 err HOME: just in rowid=`getpar rowid`

4 [ -n "`getpar rowid`" ] && par2table $formdir/user.def

5 showhome ${2:-$user}

6 ;;

7 login)

8 contenttype; echo

9 myargs=""

10 showlogin

11 ;;

12 # "edittable")

13 # contenttype; echo

14 # m4 -D_TITLE_="グループ編集/削除" $layout/html.m4.html

15 # edittable "$formdir/$2.def" "$2" "$3"

16 # ;;

17 "showattc")

18 shift

19 showattc "$@"

20 exit 0 # Do not output further chunks

21 ;;

22 invite|groupman|userconf|groupconf|mems|grps|grp|grpaction|commission|editheading|editart|showattc|send2mem)

23 contenttype; echo

24 [ -n "$1" ] && shift

25 $stage "$@"

26 ;;

27 "blog") # $2=grpID

28 contenttype; echo

29 . ./s4-blog.sh

30 blog_addentry $2

31 ;;

32 "replyblog")

33 contenttype; echo

34 rowid=${2%%[!A-Z0-9a-z_]*}

35 ## err ROWid=$rowid, '$2'=$2

36 . ./s4-blog.sh

37 err blog_reply $rowid

38 blog_reply $rowid

39 ;;

40 lshandout|gethandout)

41 contenttype; echo

42 rowid=${2%%[!A-Z0-9a-z_]*}

43 if [ -z "$rowid" ]; then

44 echo "話題番号が未指定です。" | html p

45 return

46 fi

47 . ./s4-blog.sh

48 $stage $rowid

49 ;;

50 lsmyfile)

51 contenttype; echo

52 . ./s4-blog.sh

53 shift

54 $stage "$@"

55 ;;

56 "searchart") # $2=blogowner

57 contenttype; echo

58 m4 -D_TITLE_="検索結果" $layout/html.m4.html

59 . ./s4-blog.sh

60 searchart $2

61 ;;

62 *)

63 exec $0 login

64 ;;