]> git.plutz.net Git - lobster/blobdiff - cards/index.cgi
Merge commit '647d09a619f8da6da043f56a64781a69a92265e2' into cgilite
[lobster] / cards / index.cgi
index 1f58ab0e8432a5192625a8a3581c6444b2289d69..0bb4f827c26cf53b7c934039d5260f3a88abe739 100755 (executable)
@@ -1,11 +1,5 @@
 #!/bin/sh
 
-if [ "$_PATH" = "/cards/cards.css" ]; then
-  . $_EXEC/cgilite/file.sh
-  FILE $_EXEC/cards/cards.css
-  return 0
-fi
-
 . $_EXEC/pdiread.sh
 . $_EXEC/cards/l10n.sh
 . $_EXEC/cards/widgets.sh
@@ -17,15 +11,20 @@ filter="$(GET f)"
 order="$(GET o)"
 edit="$(GET e |PATH)"
 
-[ "$order" ] || order=firstname
+[ "$order" ] || order=lastname
 edit="${edit##*/}"
 
+list_hi_companies(){
+  sed -rn 's;^X-HEALTH-INSURANCE:([^\;]+)\;.*$;\1;p' ${_DATA}/vcard/*vcf \
+  | sort -u
+}
+
 { w_filter_diag
   printf '
   [form class="newcard" action="/cards/new_card.sh" method="POST"
+    [a href="#top" . %s]
     [button type="submit" %s]
-  ]' "$(l10n newcard)"
-
+  ]' "$(l10n top)" "$(l10n newcard)"
   [ "$edit" ] && edit_card "$edit"
   list_cards
 } | yield_page cards #/cards/cards.css