btc-provider: removed some extraneous printfs
::
++ on-init
^- (quip card _this)
- ~& > '%btc-provider initialized successfully'
=| wl=^whitelist
:- ~
%_ this
++ on-load
|= old-state=vase
^- (quip card _this)
- ~& > '%btc-provider recompiled successfully '
`this(state !<(versioned-state old-state))
::
++ on-poke
^- (quip card _state)
:_ state
?. ?|(connected.host-info ?=(%ping -.act))
- ~& >>> "Not connected to RPC"
~[(send-update:hc [%| %not-connected 500])]
:_ ~
%+ req-card act
~% %btc-provider-helper ..card ~
|_ =bowl:gall
++ send-status
- |= =status ^- card
+ |= =status
+ ^- card
%- ?: ?=(%new-block -.status)
~&(>> "%new-block: {<block.status>}" same)
same
