push-hook: fix version negotiation
Addresses a bug where if the publisher could not perform the fact
conversion, it would not be deferred to the subscriber, preventing the
subscriber from being ahead of the publisher
unversioned
=/ =resource
(de-path:resource t.t.path)
+ =/ requested=@ud
+ (slav %ud i.t.t.t.t.t.path)
=/ =mark
- (append-version:ver (slav %ud i.t.t.t.t.t.path))
+ (append-version:ver (min requested version.config))
?. (supported:ver mark)
:_ this
(fact-init-kick:io version+!>(min-version.config))
%+ turn ~(tap by paths)
|= [fact-ver=@ud paths=(set path)]
=/ =mark
- (append-version:ver fact-ver)
+ (append-version:ver (min version.config fact-ver))
(fact:io (convert-from:ver mark q.cage) ~(tap in paths))
:: TODO: deprecate
++ unversioned
