X-Git-Url: https://git.plutz.net/?a=blobdiff_plain;f=cards%2Findex.cgi;h=0bb4f827c26cf53b7c934039d5260f3a88abe739;hb=b9f386037364d4a10931c37acb464f0bf6d0e5d3;hp=e25843c54d68e8019fad4977382e31d4fdc5ca85;hpb=1227cb42309bc7edd296e8fea288f68968b1e003;p=lobster

diff --git a/cards/index.cgi b/cards/index.cgi
index e25843c..0bb4f82 100755
--- a/cards/index.cgi
+++ b/cards/index.cgi
@@ -11,19 +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]
-    [input name="seed" placeholder="%s	%s	%s	%s	%s	%s	%s	()	%s	()	%s"]
-  ]' "$(l10n newcard)" \
-     "$(l10n X-ZACK-JOINDATE)" "$(l10n n_first)" "$(l10n n_last)" \
-     "$(l10n BDAY) $(l10n month)" "$(l10n BDAY) $(l10n year)" \
-     "$(l10n TEL)" "$(l10n TEL) $(l10n 'TYPE=CELL')" "$(l10n EMAIL)" \
-     "$(l10n NOTE)"
+  ]' "$(l10n top)" "$(l10n newcard)"
   [ "$edit" ] && edit_card "$edit"
   list_cards
 } | yield_page cards #/cards/cards.css