added index renderer

This commit is contained in:
Anthony 2018-02-04 20:43:43 -08:00
parent e35bf61db8
commit 9e3b98cfd9

View File

@ -0,0 +1,53 @@
/- collections
/+ rekey, old-zuse
/= gas /$ fuel:html
/= x /^ (map knot topicful:collections) /_ /collections-topic-full/
:: need a way to get the content
/= y /^ config:collections /% /&collections-config&/txt/
|%
++ authed
%+ lien
~(tap in (~(get ju aut.ced.gas) %$))
|= a/knot
=((scot %p p.bem.gas) a)
--
^- manx
=, old-zuse
;div
;h1: {(trip desc.y)}
;* ?: authed
;=
;a(href "")
;button.btn.btn-secondary
Write →
==
==
==
;=
;a(href "")
;button.btn.btn-primary
Subscribe →
==
==
==
;ul
;* %+ turn
%+ sort
~(tap by x)
::aor
|= [a=(pair knot topicful:collections) b=(pair knot topicful:collections)]
::&
(gth (unt (slav %da p.a)) (unt (slav %da p.b)))
|= [t=knot con=topicful:collections]
;li
;div
;a(href "{(trip t)}")
{(trip t)}
==
==
;div
;h2: {(trip tit.info.con)}
==
==
==
==