urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-14 11:08:45 +03:00
Code Issues Packages Projects Releases Wiki Activity

Moar printf

Browse Source
This commit is contained in:
C. Guy Yarvin 2014-12-17 13:37:14 -08:00
parent ba09dbf845
commit 22e5d78c7e
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
main/app/rodeo/core.hook
View File

@ -707,7 +707,7 @@
++ pour
|= [ost=bone pax=path sih=*]
^- [(list move) _+>]
:: ~& [%rodeo-pour ost pax sih]
~& [%rodeo-pour ost pax sih]
:: ~& sih=sih
=+ sih=((hard sign) sih)
?+ pax ~& [%rodeo-strange-path pax] !!
@ -740,7 +740,7 @@
?. =(%show i.t.pax)
~& [%pour-friend-nuke-nuke pax]
[~ +>.$]
=+ [man tay]=[i.t.t.pax `station`[%& (slav %p i.t.t.t.pax) i.t.t.t.t.pax]]
=+ [man tay]=[i.t.t.pax [%& (slav %p i.t.t.t.pax) i.t.t.t.t.pax]]
ra-abet:(~(ra-stalk ra ost ~) man tay sih)
::
[%repeat *]

3
main/app/talk/core.hook
View File

@ -14,6 +14,7 @@
parties=(map span party) :: all parties
shown=(set serial) :: messages shown
targets=(unit (set station)) :: talking to
mode=presence :: interactive mode
== ::
++ party :: local party
$: count=@ud :: number shown
@ -420,7 +421,7 @@
?(%rush %rust)
?> ?=(%type -.p.sih)
~& [%talk-inputting p.p.sih]
[~ +>.$]
[~ +>.$(mode ?:(p.p.sih %
==
::
%command