From: Paul Hänsch <paul@plutz.net>
Date: Thu, 4 Apr 2019 14:07:15 +0000 (+0200)
Subject: modular design
X-Git-Url: https://git.plutz.net/?a=commitdiff_plain;h=d3f2a05bb824037485738394d65430c5f5407a11;p=lobster

modular design
---

diff --git a/cards/main.cgi b/cards/main.cgi
index 3cf8a23..899388d 100755
--- a/cards/main.cgi
+++ b/cards/main.cgi
@@ -1,12 +1,9 @@
 #!/bin/sh
 
-if [ "$ITEM" = "cards/cards.css" ]; then
+if [ "$_PATH" = "/cards/cards.css" ]; then
   . $_EXEC/cgilite/file.sh
   FILE $_EXEC/cards/cards.css
   return 0
-elif [ "$(GET action)" = filter_card ]; then
-  . $_EXEC/cards/filter_card.sh
-  exit 0
 fi
 
 . $_EXEC/pdiread.sh
@@ -14,27 +11,18 @@ fi
 . $_EXEC/cards/widgets.sh
 . $_EXEC/cards/list.sh
 
-filter="$(GET filter)"
-order="$(GET order)"
+filter="$(GET f)"
+order="$(GET o)"
+edit="$(GET e)"
+[ "$order" ] || order=firstname
 
-printf 'Content-Type: text/html; charset=utf-8\r\n\r\n'
+{ w_filter_diag
 
-{ cat <<EOF
-[!DOCTYPE XHTML]
-[html [head
-  [title Cards]
-  [link rel="stylesheet" type="text/css" href="/style.css"]
-  [link rel="stylesheet" type="text/css" href="/cards/cards.css"]
-][body
-  $(W_NAVIGATION)
-  $(w_filter_diag)
+  printf '
+  [form class="newcard" action="cards/new_card.sh" method="POST"
+    [button type="submit" %s]
+  ]' "$(l10n newcard)"
 
-  [form class="newcard" action="?action=new_card" method="POST"
-    [button type="submit" $(l10n newcard)]
-  ]
-EOF
-list_cards
-printf ']]'
-
-} | "$_EXEC/cgilite/html-sh.sed"
-$_EXEC/cgilite/html-sh.sed <<EOF
+  [ "$edit" ] && edit_card "$edit"
+  list_cards
+} | yield_page cards /cards/cards.css