mirror of
https://github.com/urbit/shrub.git
synced 2024-12-14 20:02:51 +03:00
Cleaned ~& to ~|
This commit is contained in:
parent
f00f2a744e
commit
5de6646f9f
@ -180,7 +180,7 @@
|
||||
++ ra-twitter :: %twitter response
|
||||
|= [met=twim sih=sign]
|
||||
^+ +>
|
||||
?+ sih ~&([%rodeo-bad-twitter sih] !!)
|
||||
?+ sih ~|([%rodeo-bad-twitter sih] !!)
|
||||
[%g ?(%nice %mean) ~]
|
||||
+>
|
||||
[%g %rush %twit-stat *]
|
||||
@ -379,7 +379,7 @@
|
||||
|= [tay=partner sih=sign]
|
||||
^+ +>
|
||||
?> ?=(& -.tay)
|
||||
?+ sih ~&([%rodeo-bad-friend sih] !!)
|
||||
?+ sih ~|([%rodeo-bad-friend sih] !!)
|
||||
[%g %nice ~]
|
||||
+>.$
|
||||
::
|
||||
@ -395,7 +395,7 @@
|
||||
:_ ~
|
||||
:- /friend/show/[man]/(scot %p p.p.tay)/[q.p.tay]
|
||||
[%g %took [p.p.tay /rodeo] our.hid]
|
||||
?+ -.p.p.sih ~&([%rodeo-odd-friend sih] !!)
|
||||
?+ -.p.p.sih ~|([%rodeo-odd-friend sih] !!)
|
||||
%config +>.$
|
||||
%group (pa-remind tay +.p.p.sih)
|
||||
%grams (pa-lesson q.+.p.p.sih)
|
||||
|
@ -348,8 +348,8 @@
|
||||
|= job=work
|
||||
^+ +>
|
||||
?- -.job
|
||||
%ask ~&(%sy-work-ask-stub !!)
|
||||
%exp ~&(%sy-work-exp-stub !!)
|
||||
%ask ~|(%sy-work-ask-stub !!)
|
||||
%exp ~|(%sy-work-exp-stub !!)
|
||||
%mor
|
||||
|- ^+ +>.^$
|
||||
?~ +.job +>.^$
|
||||
@ -378,8 +378,8 @@
|
||||
[%publish [[sir sy-audience [lat.hid ~ +.job]] ~]]
|
||||
==
|
||||
::
|
||||
%wry ~&(%sy-work-wry !!)
|
||||
%who ~&(%sy-work-who-stub !!)
|
||||
%wry ~|(%sy-work-wry !!)
|
||||
%who ~|(%sy-work-who-stub !!)
|
||||
==
|
||||
::
|
||||
++ sy-gram :: apply telegram
|
||||
@ -390,7 +390,7 @@
|
||||
=< hy-abet
|
||||
%- hy-render:(hype moz)
|
||||
=* sta r.q.gam
|
||||
?+ -.r.sta ~&([%strange-gram -.r.sta] !!)
|
||||
?+ -.r.sta ~|([%strange-gram -.r.sta] !!)
|
||||
::
|
||||
%lin
|
||||
:- %txt
|
||||
@ -497,7 +497,7 @@
|
||||
|= rad=report
|
||||
^+ +>
|
||||
?- -.rad
|
||||
%house ~&(%sz-apply-house !!)
|
||||
%house ~|(%sz-apply-house !!)
|
||||
%grams +>(+> (sy-grams +.rad))
|
||||
%config (sz-config +.rad)
|
||||
%group (sz-group +.rad)
|
||||
@ -607,12 +607,12 @@
|
||||
%command
|
||||
?+ +<.sih !!
|
||||
%nice [~ +>.$]
|
||||
%mean ~&([%pour-mean-cmd-in +>.sih] !!)
|
||||
%mean ~|([%pour-mean-cmd-in +>.sih] !!)
|
||||
==
|
||||
%cmd-in
|
||||
?+ +<.sih !!
|
||||
%nice [~ +>.$]
|
||||
%mean ~&([%pour-mean-cmd-in +>.sih] !!)
|
||||
%mean ~|([%pour-mean-cmd-in +>.sih] !!)
|
||||
%rush
|
||||
?> ?=(%txt -.p.sih)
|
||||
=^ moz +>.$ (pour-shell p.p.sih)
|
||||
@ -623,7 +623,7 @@
|
||||
%cmd-ac
|
||||
?+ +<.sih !!
|
||||
%nice [~ +>.$]
|
||||
%mean ~&([%pour-mean-cmd-ac +>.sih] !!)
|
||||
%mean ~|([%pour-mean-cmd-ac +>.sih] !!)
|
||||
%rush
|
||||
:_ +>.$
|
||||
[ost %pass pax %g %took [our.hid +.imp.hid] our.hid]~
|
||||
@ -632,7 +632,7 @@
|
||||
%server
|
||||
?+ +<.sih !!
|
||||
%nice [~ +>.$]
|
||||
%mean ~&(%talk-server-crash !!)
|
||||
%mean ~|(%talk-server-crash !!)
|
||||
%rush
|
||||
?> ?=([%rodeo-report %house *] p.sih)
|
||||
=^ moz +>.$ ny-abet:(ny-tell:ny +.p.p.sih)
|
||||
|
Loading…
Reference in New Issue
Block a user