work: fix argument

This commit is contained in:
raghu 2021-06-07 22:54:26 -04:00
parent de3df8c953
commit 6d4c9ab16f

View File

@ -11,7 +11,7 @@
|= arg=vase
=/ m (strand ,vase)
^- form:m
=+ !<(desks=(list desk) arg)
=+ !<([~ desks=(list desk)] arg)
=? desks =(~ desks) [%work]~
|- ^- form:m
=* loop $