git.plutz.net Git - confetti/blob - courses/index.cgi

   1 #!/bin/sh
   2
   3 if [ "$_PATH" = "/courses/courses.css" ]; then
   4   . $_EXEC/cgilite/file.sh
   5   FILE $_EXEC/courses/courses.css
   6   return 0
   7 fi
   8
   9 . $_EXEC/pdiread.sh
  10 . $_EXEC/courses/l10n.sh
  11 . $_EXEC/courses/widgets.sh
  12 . $_EXEC/courses/list.sh
  13
  14 upcase=' y;abcdefghijklmnopqrstuvwxyzäöüé;ABCDEFGHIJKLMNOPQRSTUVWXYZÄÖÜÉ;; '
  15
  16 order="$(GET o |grep -m1 -xE 'DOW|TOD')"
  17 edit="$(GET e |PATH)"
  18
  19 [ "$order" ] || order=DOW
  20 edit="${edit##*/}"
  21
  22 { w_sort_courses
  23   printf '
  24   [form .newcourses action="/courses/new_course.sh" method="POST"
  25     [button type="submit" %s]
  26   ]' "$(l10n newcourse)"
  27
  28   [ "$edit" ] && edit_course "$edit"
  29   printf '[div .courselist\n'
  30     list_courses
  31   printf ']'
  32 } | yield_page courses #/courses/courses.css