Ticketing works.

This commit is contained in:
C. Guy Yarvin 2017-10-11 17:00:21 -07:00
parent 266745b34a
commit 5c3fd13cc9
5 changed files with 16 additions and 5 deletions

View File

@ -7,7 +7,7 @@
[. sole]
=, space:userlib
=, format
!:
!:
:: :: ::
:::: :: ::::
:: :: ::

View File

@ -181,7 +181,7 @@
++ poke-write-plan-account (wrap poke-plan-account):from-write
++ poke-write-tree (wrap poke-tree):from-write
++ poke-write-wipe (wrap poke-wipe):from-write
++ poke-wyll (wrap poke-wyll):from-helm
++ poke-will (wrap poke-will):from-helm
++ quit-drum-phat (wrap quit-phat):from-drum
++ reap-drum-phat (wrap reap-phat):from-drum
++ woot-helm (wrap take-woot):from-helm

View File

@ -188,14 +188,14 @@
[%e %eyre]
[%f %ford]
[%g %gall]
[%j %jael]
:: [%j %jael]
==
|= {p/@tas q/@tas}
=+ way=`path`(welp top /vane/[q])
=+ txt=.^(@ %cx (welp way /hoon))
[%flog /reset %veer p way txt]
::
++ poke-wyll :: hear certificate
++ poke-will :: hear certificate
|= wil/(unit wyll:ames)
?> ?=(^ bur)
?> ?=(^ wil)

11
mar/will.hoon Normal file
View File

@ -0,0 +1,11 @@
::
:::: /hoon/will/mar
::
/? 310
|_ wyl/(unit wyll:ames)
::
++ grab :: convert from
|%
++ noun (unit wyll:ames) :: clam from %noun
--
--

View File

@ -1599,7 +1599,7 @@
==
::
$cake
~? ?=(^ r.bon) [%cake-woot-bad hen]
~? ?=(^ r.bon) [%cake-woot-bad hen r.bon]
:_ fox
:~ [s.bon %give %woot q.p.bon r.bon]
==