:: btc-wallet-store.hoon :: Manages wallet pubkeys :: /+ dbug, default-agent |% +$ versioned-state $% state-0 == :: +$ state-0 [%0 connected=?] :: +$ card card:agent:gall +$ command $? %add-wallet == :: -- =| state-0 =* state - %- agent:dbug ^- agent:gall |_ =bowl:gall +* this . des ~(. (default:shoe this command) bowl) def ~(. (default-agent this %|) bowl) :: ++ on-init ^- (quip card _this) ~& > '%btc-wallet-store initialized' `this ++ on-save ^- vase !>(state) ++ on-load |= old-state=vase ^- (quip card _this) ~& > '%btc-wallet-store recompiled' `this(state !<(versioned-state old-state)) ++ on-poke |= [=mark =vase] ^- (quip card _this) `this :: ++ on-watch on-watch:def ++ on-leave on-leave:def ++ on-peek on-peek:def ++ on-agent on-agent:def ++ on-arvo on-arvo:def ++ on-fail on-fail:def --