naive: give naive state after aggregator subscription

This commit is contained in:
yosoyubik 2021-06-01 14:23:53 +02:00
parent 52af4ad1c3
commit 5453722728

View File

@ -283,6 +283,9 @@
|= =path
^- (quip card:agent:gall _this)
?< =(/sole/drum path)
?: =(/aggregator path)
:_ this
[%give %fact ~ %naive-state !>(nas.state)]~
=/ who=(unit ship)
?~ path ~
?: ?=([@ ~] path) ~