ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 10:02:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

Cleaned ~& to ~|

Browse Source
This commit is contained in:
Anton Dyudin 2015-01-26 20:35:03 -08:00
parent f00f2a744e
commit 5de6646f9f
2 changed files with 13 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -180,7 +180,7 @@
++ ra-twitter :: %twitter response ++ ra-twitter :: %twitter response
|= [met=twim sih=sign] |= [met=twim sih=sign]
^+ +> ^+ +>
?+ sih ~&([%rodeo-bad-twitter sih] !!) ?+ sih ~|([%rodeo-bad-twitter sih] !!)
[%g ?(%nice %mean) ~] [%g ?(%nice %mean) ~]
+> +>
[%g %rush %twit-stat *] [%g %rush %twit-stat *]
@ -379,7 +379,7 @@
|= [tay=partner sih=sign] |= [tay=partner sih=sign]
^+ +> ^+ +>
?> ?=(& -.tay) ?> ?=(& -.tay)
?+ sih ~&([%rodeo-bad-friend sih] !!) ?+ sih ~|([%rodeo-bad-friend sih] !!)
[%g %nice ~] [%g %nice ~]
+>.$ +>.$
:: ::
@ -395,7 +395,7 @@
:_ ~ :_ ~
:- /friend/show/[man]/(scot %p p.p.tay)/[q.p.tay] :- /friend/show/[man]/(scot %p p.p.tay)/[q.p.tay]
[%g %took [p.p.tay /rodeo] our.hid] [%g %took [p.p.tay /rodeo] our.hid]
?+ -.p.p.sih ~&([%rodeo-odd-friend sih] !!) ?+ -.p.p.sih ~|([%rodeo-odd-friend sih] !!)
%config +>.$ %config +>.$
%group (pa-remind tay +.p.p.sih) %group (pa-remind tay +.p.p.sih)
%grams (pa-lesson q.+.p.p.sih) %grams (pa-lesson q.+.p.p.sih)

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

@ -348,8 +348,8 @@
|= job=work |= job=work
^+ +> ^+ +>
?- -.job ?- -.job
%ask ~&(%sy-work-ask-stub !!) %ask ~|(%sy-work-ask-stub !!)
%exp ~&(%sy-work-exp-stub !!) %exp ~|(%sy-work-exp-stub !!)
%mor %mor
|- ^+ +>.^$ |- ^+ +>.^$
?~ +.job +>.^$ ?~ +.job +>.^$
@ -378,8 +378,8 @@
[%publish [[sir sy-audience [lat.hid ~ +.job]] ~]] [%publish [[sir sy-audience [lat.hid ~ +.job]] ~]]
== ==
:: ::
%wry ~&(%sy-work-wry !!) %wry ~|(%sy-work-wry !!)
%who ~&(%sy-work-who-stub !!) %who ~|(%sy-work-who-stub !!)
== ==
:: ::
++ sy-gram :: apply telegram ++ sy-gram :: apply telegram
@ -390,7 +390,7 @@
=< hy-abet =< hy-abet
%- hy-render:(hype moz) %- hy-render:(hype moz)
=* sta r.q.gam =* sta r.q.gam
?+ -.r.sta ~&([%strange-gram -.r.sta] !!) ?+ -.r.sta ~|([%strange-gram -.r.sta] !!)
:: ::
%lin %lin
:- %txt :- %txt
@ -497,7 +497,7 @@
|= rad=report |= rad=report
^+ +> ^+ +>
?- -.rad ?- -.rad
%house ~&(%sz-apply-house !!) %house ~|(%sz-apply-house !!)
%grams +>(+> (sy-grams +.rad)) %grams +>(+> (sy-grams +.rad))
%config (sz-config +.rad) %config (sz-config +.rad)
%group (sz-group +.rad) %group (sz-group +.rad)
@ -607,12 +607,12 @@
%command %command
?+ +<.sih !! ?+ +<.sih !!
%nice [~ +>.$] %nice [~ +>.$]
%mean ~&([%pour-mean-cmd-in +>.sih] !!) %mean ~|([%pour-mean-cmd-in +>.sih] !!)
== ==
%cmd-in %cmd-in
?+ +<.sih !! ?+ +<.sih !!
%nice [~ +>.$] %nice [~ +>.$]
%mean ~&([%pour-mean-cmd-in +>.sih] !!) %mean ~|([%pour-mean-cmd-in +>.sih] !!)
%rush %rush
?> ?=(%txt -.p.sih) ?> ?=(%txt -.p.sih)
=^ moz +>.$ (pour-shell p.p.sih) =^ moz +>.$ (pour-shell p.p.sih)
@ -623,7 +623,7 @@
%cmd-ac %cmd-ac
?+ +<.sih !! ?+ +<.sih !!
%nice [~ +>.$] %nice [~ +>.$]
%mean ~&([%pour-mean-cmd-ac +>.sih] !!) %mean ~|([%pour-mean-cmd-ac +>.sih] !!)
%rush %rush
:_ +>.$ :_ +>.$
[ost %pass pax %g %took [our.hid +.imp.hid] our.hid]~ [ost %pass pax %g %took [our.hid +.imp.hid] our.hid]~
@ -632,7 +632,7 @@
%server %server
?+ +<.sih !! ?+ +<.sih !!
%nice [~ +>.$] %nice [~ +>.$]
%mean ~&(%talk-server-crash !!) %mean ~|(%talk-server-crash !!)
%rush %rush
?> ?=([%rodeo-report %house *] p.sih) ?> ?=([%rodeo-report %house *] p.sih)
=^ moz +>.$ ny-abet:(ny-tell:ny +.p.p.sih) =^ moz +>.$ ny-abet:(ny-tell:ny +.p.p.sih)