Fixed an error preventing correct binding from -X last messages from a particular station through inbox.
=- (~(so-first-grams so:ta nom.qer ~ -) ran.qer)
::TODO this can be done more efficiently.
?~ wer.qer u.soy
- %_ u.soy
- grams
+ =- u.soy(grams -, count (lent -))
?. (~(has by sourced.u.soy) u.wer.qer) ~
- %+ turn (~(got by sourced.u.soy) u.wer.qer)
+ %+ turn
+ %- flop
+ (~(got by sourced.u.soy) u.wer.qer)
|= n/@ud
(snag n grams.u.soy)
- ==
(cury gram-to-envelope nom.qer)
:- shape.u.soy
?. (~(has in wat.qer) %config-r) ~
