mirror of
https://github.com/urbit/shrub.git
synced 2025-01-04 10:32:34 +03:00
gall: support %a scries at the current time
This commit is contained in:
parent
31a2697260
commit
f0043aa4ec
@ -2056,13 +2056,13 @@
|
|||||||
?~ yok ~
|
?~ yok ~
|
||||||
=/ ski (~(get by sky.u.yok) s.bem)
|
=/ ski (~(get by sky.u.yok) s.bem)
|
||||||
?~ ski ~
|
?~ ski ~
|
||||||
?. ?=(%ud -.r.bem) ~
|
=/ res=(unit (each noun @uvI))
|
||||||
=/ res (get:on-path fan.u.ski p.r.bem)
|
?+ -.r.bem ~
|
||||||
?~ res ~
|
%ud (get:on-path fan.u.ski p.r.bem)
|
||||||
?- -.u.res
|
%da ?>(=(p.r.bem now) (bind (ram:on-path fan.u.ski) tail))
|
||||||
%| ~
|
==
|
||||||
%& ``[%noun %noun p.u.res]
|
?. ?=([~ %& *] res) ~
|
||||||
==
|
``[%noun %noun p.u.res]
|
||||||
:: TODO new care to ask for hash of a sky binding
|
:: TODO new care to ask for hash of a sky binding
|
||||||
::
|
::
|
||||||
?. ?=(%.y -.shop)
|
?. ?=(%.y -.shop)
|
||||||
|
Loading…
Reference in New Issue
Block a user