shoe: print tab options less eagerly
Turns out that having these pop up on every tab-press is really annoying,
and you usually only want them when it didn't manage to autocomplete anything.
[%det clear]
==
::
- ::NOTE cargo-culted
++ tab
|= pos=@ud
^- (quip card _cli-state)
%+ add pos
(met 3 (fall forward ''))
=| cards=(list card)
- =? cards ?=(^ options)
+ :: only render the option list if we couldn't complete anything
+ ::
+ =? cards &(?=(~ to-send) ?=(^ options))
[(effect %tab options) cards]
|- ^- (quip card _cli-state)
?~ to-send
