Merge commit 'de9b65d9eca6a2f9b2c3d09235f793799e6daada' into cgilite

[lobster] / cards / index.cgi

diff --git a/cards/index.cgi b/cards/index.cgi
index 933b1d188c1a5aea53876e77c40139ea00681ef1..b48e54e02677e19b40530790bdfdc0481de3b3da 100755 (executable)
--- a/cards/index.cgi
+++ b/cards/index.cgi
@@ -11,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"
     [button type="submit" %s]
-  ]' "$(l10n newcard)"
-
+    [a href="#top" . %s]
+  ]' "$(l10n newcard)" "$(l10n page_top)"
   [ "$edit" ] && edit_card "$edit"
   list_cards
 } | yield_page cards #/cards/cards.css