mirror of
https://github.com/urbit/shrub.git
synced 2024-12-14 20:02:51 +03:00
Continued to fix tall form
This commit is contained in:
parent
8fa1cf3c37
commit
3f74cdfbc6
@ -86,10 +86,11 @@
|
||||
^- $+(nail (like coma))
|
||||
=+ paf=pax
|
||||
=. pax ?.(&(?=([@ @ @ *] pax) =('0' &3.pax)) pax pax(&3 (scot da/lat)))
|
||||
%+ ifix [(star ace) (star ace)]
|
||||
;~ pose
|
||||
(stag %run ;~(plug (star ;~(sfix (task(tol %0) bar) ace)) (task col)))
|
||||
(stag %end ;~(pfix sem ;~(pose (stag %& dem) (stag %| sym))))
|
||||
(stag %path loca(pax paf))
|
||||
(stag %path (full loca(pax paf)))
|
||||
(stag %del ;~(pfix hep ace loca))
|
||||
(stag %mut ;~(pfix col ace ;~(plug loca expg)))
|
||||
(stag %ins ;~(pfix lus ace ;~(plug loca (opts expg))))
|
||||
@ -200,6 +201,7 @@
|
||||
[[ost %give %nice ~] mof]
|
||||
^- [con=_+>.$ tak=$|(~ tank) mof=(list move)]
|
||||
=+ pas=((full ~(parse from pax lat.hid)) [1 1] (trip txt))
|
||||
~& term-poke/txt
|
||||
?~ q.pas
|
||||
[+>.$ leaf/"<syntax error at {<`[@ @]`p.pas>}>" ~]
|
||||
=+ com=(wonk pas)
|
||||
|
Loading…
Reference in New Issue
Block a user