mirror of
https://github.com/urbit/shrub.git
synced 2024-12-22 10:21:31 +03:00
Merge fab9a47a92
into release/next-js
This commit is contained in:
commit
f3c7ff2a50
@ -101,7 +101,7 @@
|
|||||||
==
|
==
|
||||||
::
|
::
|
||||||
++ handle-initial
|
++ handle-initial
|
||||||
|= [rolo=rolodex:store is-public=?]
|
|= [rolo=rolodex:store *]
|
||||||
^- (quip card _state)
|
^- (quip card _state)
|
||||||
=/ our-contact (~(got by rolodex) our.bowl)
|
=/ our-contact (~(got by rolodex) our.bowl)
|
||||||
=/ diff-rolo=rolodex:store
|
=/ diff-rolo=rolodex:store
|
||||||
@ -143,7 +143,7 @@
|
|||||||
|= [=ship =edit-field:store timestamp=@da]
|
|= [=ship =edit-field:store timestamp=@da]
|
||||||
|^
|
|^
|
||||||
^- (quip card _state)
|
^- (quip card _state)
|
||||||
=/ old (~(got by rolodex) ship)
|
=/ old (fall (~(get by rolodex) ship) *contact:store)
|
||||||
?: (lte timestamp last-updated.old)
|
?: (lte timestamp last-updated.old)
|
||||||
[~ state]
|
[~ state]
|
||||||
=/ contact (edit-contact old edit-field)
|
=/ contact (edit-contact old edit-field)
|
||||||
|
@ -93,6 +93,18 @@
|
|||||||
=/ entry=(unit val) (~(get by bucket) key)
|
=/ entry=(unit val) (~(get by bucket) key)
|
||||||
?~ entry [~ ~]
|
?~ entry [~ ~]
|
||||||
``settings-data+!>(entry+u.entry)
|
``settings-data+!>(entry+u.entry)
|
||||||
|
::
|
||||||
|
[%x %has-bucket @ ~]
|
||||||
|
=* buc i.t.t.pax
|
||||||
|
=/ has-bucket=? (~(has by settings) buc)
|
||||||
|
``noun+!>(has-bucket)
|
||||||
|
::
|
||||||
|
[%x %has-entry @ @ ~]
|
||||||
|
=* buc i.t.t.pax
|
||||||
|
=* key i.t.t.t.pax
|
||||||
|
=/ =bucket (fall (~(get by settings) buc) ~)
|
||||||
|
=/ has-entry=? (~(has by bucket) key)
|
||||||
|
``noun+!>(has-entry)
|
||||||
==
|
==
|
||||||
::
|
::
|
||||||
++ on-agent on-agent:def
|
++ on-agent on-agent:def
|
||||||
|
Loading…
Reference in New Issue
Block a user