mirror of
https://github.com/urbit/shrub.git
synced 2024-11-28 13:54:20 +03:00
docket: fix "do we have this glob yet" check
We were incorrectly assuming we were comparing against a unit value. Also makes a ~| more useful.
This commit is contained in:
parent
131cd82fc8
commit
09c74dbaff
@ -213,7 +213,8 @@
|
||||
=. by-base (~(put by by-base) base.href.docket desk.diff)
|
||||
:: if the glob specification is unchanged, keep it
|
||||
::
|
||||
?: &(?=(^ pre) =(href.docket.u.pre `href.docket))
|
||||
::
|
||||
?: &(?=(^ pre) =(href.docket.u.pre href.docket))
|
||||
[~[add-fact:cha] state]
|
||||
:: if the glob spec changed, but we already host it, keep it
|
||||
:: (this is the "just locally uploaded" case)
|
||||
@ -250,13 +251,14 @@
|
||||
?. ?=([%suspend ~ *] chad.charge)
|
||||
[%install ~]
|
||||
[%glob u.glob.chad.charge]
|
||||
~& %rev
|
||||
:_(state [add-fact fetch-glob]:cha)
|
||||
==
|
||||
==
|
||||
++ take-charge
|
||||
|= [=desk =^wire]
|
||||
^- (quip card _state)
|
||||
~| %took-for-nonexistent-charge
|
||||
~| [%took-for-nonexistent-charge desk]
|
||||
?> (~(has by charges) desk)
|
||||
=* cha ~(. ch desk)
|
||||
?+ wire ~|(%bad-charge-wire !!)
|
||||
|
Loading…
Reference in New Issue
Block a user