mirror of
https://github.com/urbit/shrub.git
synced 2024-12-24 11:24:21 +03:00
821f99a351
This commit refactors `sur/hood.hoon` and changes the signature of the
`+vats` generator thus:
```hoon
|= $: [now=@da eny=@uvJ bec=beak]
$@(~ [?(%suspended %running %blocking %nonexistent) ~])
$: verb=?
show-suspended=?
show-running=?
show-blocking=?
show-nonexistent=?
==
==
```
Called with a single positional argument, `+vats` will show only those
desks fitting the description given, while keyword parameters allow
finer-grained control over which desks are described. The `verb`
parameter determines whether the full load of desk information be shown,
or a subset thereof.
Resolves #6297.
21 lines
485 B
Plaintext
21 lines
485 B
Plaintext
/- *hood
|
|
:- %say
|
|
|= $: [now=@da eny=@uvJ bec=beak]
|
|
$@(~ [?(%suspended %running %blocking %nonexistent) ~])
|
|
$: verb=?
|
|
show-suspended=?
|
|
show-running=?
|
|
show-blocking=?
|
|
show-nonexistent=?
|
|
==
|
|
==
|
|
=+ :- verb
|
|
?~ +<+< +<+>+
|
|
?- -.+<+<
|
|
%suspended [& | | |]
|
|
%running [| & | |]
|
|
%blocking [| | & |]
|
|
%nonexistent [| | | &]
|
|
==
|
|
tang+((report-vats p.bec now) -)
|