[fix] signal-opts: allow map forms as intended

This commit is contained in:
Peter Taoussanis 2024-10-07 10:46:45 +02:00
parent 7f52cb1843
commit f7a56631c5

View file

@ -490,8 +490,8 @@
extra-opts? (and extra-arg? (map? extra-arg))] extra-opts? (and extra-arg? (map? extra-arg))]
:do :do
(cond (enc/cond
(map? main-arg) (and (map? main-arg) (not extra-arg?))
(bad-args! "single map arg is USUALLY a mistake, so isn't allowed. Please use 2 arg call if this is intentional." {}) (bad-args! "single map arg is USUALLY a mistake, so isn't allowed. Please use 2 arg call if this is intentional." {})
(and extra-opts? (contains? extra-arg main-key)) (and extra-opts? (contains? extra-arg main-key))