ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-14 17:41:33 +03:00
Code Issues Packages Projects Releases Wiki Activity

Syntax change.

Browse Source
This commit is contained in:
C. Guy Yarvin 2015-01-26 20:12:06 -08:00
parent 3431844d94
commit a441475a9a
2 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -2,7 +2,7 @@
:::: /hook/core/rodeo/app
::
/? 314
/- *rodeo
/- *rodeo, *twitter
/+ rodeo
::
::::
@ -141,7 +141,7 @@
++ ra-apply :: apply command
|= [her=ship cod=command]
^+ +>
:: ~& [%ra-apply cod]
~& [%ra-apply cod]
?- -.cod
%design
?. =(her our.hid)
@ -267,7 +267,8 @@
%| ?. pub +>
?- -.p.tay
%twitter
!!
~& [%ra-conduct tip]
+>.$
== ==
::
++ ra-record :: add to story
@ -529,7 +530,7 @@
::
++ pa-refresh :: update stream
|= [num=@ud gam=telegram]
:: ~& [%pa-refresh num gam]
~& [%pa-refresh man num gam guests]
=+ ^= moy
|- ^- (pair (list bone) (list move))
?~ guests [~ ~]

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

@ -166,11 +166,9 @@
ship
;~(pose ;~(pfix fas urs:ab) (easy (main our)))
==
;~ pfix ket
;~ pose
;~(pfix pat (stag %twitter urs:ab))
==
==
::
++ staz :: partner set
%+ cook
@ -245,7 +243,7 @@
?: =((main p.p.i.tuo) q.p.i.tuo)
sip
:(welp sip "/" (trip q.p.i.tuo))
%| ['^' '@' (trip p.p.i.tuo)]
%| ['@' (trip p.p.i.tuo)]
==
?~ ted ind
(welp ind `tape`[',' ' ' ted])