default ~.public station

This commit is contained in:
Anton Dyudin 2016-03-22 17:15:58 -07:00
parent 6fe20c5e97
commit b7efb9bee5

View File

@ -1282,11 +1282,16 @@
(ra-house n.gel)
::
++ ra-init :: initialize talk
%+ roll
^- (list {posture knot cord})
:~ [%brown (main our.hid) 'default home']
[%green ~.public 'visible activity']
==
|: [[typ=*posture man=*knot des=*cord] ..ra-init] ^+ ..ra-init
%+ ra-apply our.hid
:+ %design (main our.hid)
:+ %design man
:- ~ :- ~
:- 'default home'
[%brown ~]
[des [typ ~]]
::
++ ra-apply :: apply command
|= {her/ship cod/command}