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

Changed ++ta-note to accept a tape.

Browse Source
This commit is contained in:
Fang 2017-11-03 20:31:16 +01:00
parent 3bb8df9e01
commit ba7b4c47e4
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
app/talk-guardian.hoon
View File

@ -178,10 +178,10 @@
::> sends {msg} as an %app message to the user's
::> inbox.
::
|= msg/cord
|= msg/tape
%^ ta-action 0 %phrase
:- [[our.bol %inbox] ~ ~]
[%app dap.bol msg]~
[%app dap.bol (crip msg)]~
::
++ ta-evil ::< emit error
::> tracing printf and crash.
@ -603,14 +603,13 @@
^+ +>
?: pub
?. (team:title our.bol aut)
%- ta-note
(crip "strange author {(scow %p aut)}")
(ta-note "strange author {(scow %p aut)}")
=. aut our.bol
?: =(aut hos.cir)
?: (~(has by stories) nom.cir)
(ta-record nom.cir hos.cir tot)
%- ta-note ::TODO avenue for abuse?
(crip "have no story {(scow %tas nom.cir)}")
::TODO avenue for abuse?
(ta-note "have no story {(scow %tas nom.cir)}")
(ta-transmit cir tot)
?. =(our.bol hos.cir) +>
(ta-record nom.cir aut tot)
@ -1996,7 +1995,7 @@
?. (team:title src.bol our.bol)
%- pre-bake
=< ta-done
%- ta-note:ta %- crip
%- ta-note:ta
"talk-action stranger {(scow %p src.bol)}"
%- pre-bake
ta-done:(ta-action:ta ost.bol act)