cleaned tree-eyre-handler

This commit is contained in:
SuperCoolYun 2024-07-12 14:11:37 -04:00
parent d9d72021ea
commit ec268ffeca

View File

@ -65,7 +65,7 @@
['content-type' 'text/html']~ ['content-type' 'text/html']~
*manx *manx
== ==
:: if goof retur err stack trace :: if goof return err stack trace
%goof %goof
=/ =tang +.quit =/ =tang +.quit
=/ trace-manx =/ trace-manx
@ -113,7 +113,7 @@
=+ !<([eyre-id=@ta req=inbound-request:eyre] vase) =+ !<([eyre-id=@ta req=inbound-request:eyre] vase)
:_ [stud vase] :_ [stud vase]
?~ src=(~(get by deps.bowl) %src) ?~ src=(~(get by deps.bowl) %src)
=/ stub=manx =/ empty-view=manx
;div ;div
;h1: nothing here ;h1: nothing here
== ==
@ -122,14 +122,14 @@
bowl bowl
404 404
['content-type' 'text/html']~ ['content-type' 'text/html']~
stub empty-view
== ==
=/ here p.u.src =/ here p.u.src
^- (list card:neo) ^- (list card:neo)
?+ method.request.req ~|(%unsupported-http-method !!) ?+ method.request.req ~|(%unsupported-http-method !!)
:: ::
%'GET' %'GET'
?~ reet=(~(get of:neo q.u.src) /) ?~ (~(get of:neo q.u.src) /)
=/ empty-view=manx =/ empty-view=manx
;div ;div
;h1: nothing here ;h1: nothing here
@ -144,22 +144,16 @@
=/ bol *bowl:neo =/ bol *bowl:neo
=. here.bol here =. here.bol here
=. kids.bol q.u.src =. kids.bol q.u.src
=/ view=manx
;div
;+ (view bol)
==
%: eyre-cards %: eyre-cards
eyre-id eyre-id
bowl bowl
200 200
['content-type' 'text/html']~ ['content-type' 'text/html']~
view (view bol)
== ==
:: ::
%'POST' %'POST'
=/ purl (parse-url:serv request.req) =/ purl (parse-url:serv request.req)
=/ content-type (~(gut by pam.purl) 'content-type' 'text/html')
=/ body (parse-body:serv request.req)
=/ poke-stud =/ poke-stud
^- stud:neo ^- stud:neo
~| %no-stud-specified ~| %no-stud-specified
@ -232,8 +226,6 @@
^- (list card:neo) ^- (list card:neo)
=/ cards *(list card:neo) =/ cards *(list card:neo)
=/ kids (get-kids pith lore) =/ kids (get-kids pith lore)
~& >> head-pith/head-pith
~& > all-kids/kids
?~ kids ~ ?~ kids ~
%+ turn kids %+ turn kids
|= p=pith:neo |= p=pith:neo
@ -329,7 +321,7 @@
:: ::
++ body-view ++ body-view
|= =bowl:neo |= =bowl:neo
;div ;div.fc.js.p2.wf.p1
;+ (kids-view bowl) ;+ (kids-view bowl)
== ==
:: ::
@ -349,7 +341,7 @@
%- crip "[{(en-tape:pith:neo pith)}]" %- crip "[{(en-tape:pith:neo pith)}]"
=/ row-template=tape (join ' auto ' (weld "[first-row]" `tape`first-kids)) =/ row-template=tape (join ' auto ' (weld "[first-row]" `tape`first-kids))
;div ;div
=style "display: grid; grid-template-rows: {row-template}; grid-template-columns: auto; padding: 12px;" =style "display: grid; grid-template-rows: {row-template}; grid-template-columns: auto; padding: 12px; margin:20px"
;+ ;+
?~ node=(~(get of:neo kids.bowl) /) ?~ node=(~(get of:neo kids.bowl) /)
;div: no kids ;div: no kids