on main help sign in
Merge pull request #6 from tinnus-napbus/remove-printfs
5172256johnhyde
desk/app/astrolabe.hoon+10−8
@@ -98,7 +98,7 @@
98 [cards this]
98 [cards this]
99 ::
99 ::
100 %naive-state
100 %naive-state
101− ~& > %received-azimuth-state
101+ :: ~& > %received-azimuth-state
102 :: =+ !<([nas=^state:naive =indices:dice] q.cage.sign)
102 :: =+ !<([nas=^state:naive =indices:dice] q.cage.sign)
103 =+ !<([nas=^state:naive indices=*] q.cage.sign)
103 =+ !<([nas=^state:naive indices=*] q.cage.sign)
104 =^ cards state
104 =^ cards state
@@ -140,12 +140,12 @@
140++ on-naive-diff
140++ on-naive-diff
141 |= =diff:naive
141 |= =diff:naive
142 ^- (quip card _state)
142 ^- (quip card _state)
143− ~& %+ weld "received diff:naive: {<-.diff>}"
143+ :: ~& %+ weld "received diff:naive: {<-.diff>}"
144− ?+ -.diff ""
144+ :: ?+ -.diff ""
145− %nonce " ship: {<ship.diff>}"
145+ :: %nonce " ship: {<ship.diff>}"
146− %tx " from: {<ship.from.tx.raw-tx.diff>} - {<+<.tx.raw-tx.diff>}"
146+ :: %tx " from: {<ship.from.tx.raw-tx.diff>} - {<+<.tx.raw-tx.diff>}"
147− %point " ship: {<ship.diff>} - {<+>-.diff>}"
147+ :: %point " ship: {<ship.diff>} - {<+>-.diff>}"
148− ==
148+ :: ==
149 =? state ?=([%tx [* * * %spawn ship *] *] diff)
149 =? state ?=([%tx [* * * %spawn ship *] *] diff)
150 %- put-in-opoints
150 %- put-in-opoints
151 ship.tx.raw-tx.diff
151 ship.tx.raw-tx.diff
@@ -274,7 +274,9 @@
274 =/ res
274 =/ res
275 %+ roll `(list mr-search)`mr-searches
275 %+ roll `(list mr-search)`mr-searches
276 run-mr-search
276 run-mr-search
277+ :: ~& "search for {<search-text>}".
277− ~& "search for {<search-text>} returning {<~(wyt by agg.res)>} of {<count.res>} results"
278+ :: "returning {<~(wyt by agg.res)>}".
279+ :: "of {<count.res>} results"
278 (turn ~(tap in agg.res) head)
280 (turn ~(tap in agg.res) head)
279::
281::
280++ sponsor-chain
282++ sponsor-chain