urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2025-01-02 01:25:55 +03:00
Code Issues Packages Projects Releases Wiki Activity

gall: support %a scries at the current time

Browse Source
This commit is contained in:
~wicrum-wicrun 2023-03-28 18:34:35 +02:00
parent 31a2697260
commit f0043aa4ec
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
pkg/arvo/sys/vane/gall.hoon
View File

@ -2056,13 +2056,13 @@
?~ yok ~
=/ ski (~(get by sky.u.yok) s.bem)
?~ ski ~
?. ?=(%ud -.r.bem) ~
=/ res (get:on-path fan.u.ski p.r.bem)
?~ res ~
?- -.u.res
%| ~
%& ``[%noun %noun p.u.res]
==
=/ res=(unit (each noun @uvI))
?+ -.r.bem ~
%ud (get:on-path fan.u.ski p.r.bem)
%da ?>(=(p.r.bem now) (bind (ram:on-path fan.u.ski) tail))
==
?. ?=([~ %& *] res) ~
``[%noun %noun p.u.res]
:: TODO new care to ask for hash of a sky binding
::
?. ?=(%.y -.shop)