Fix issues with argument parsing in rcirc-define-command

* rcirc.el (rcirc-define-command): Fix issues
This commit is contained in:
Philip Kaludercic 2021-07-06 08:50:21 +02:00
parent f222fe6163
commit 1d73575681
No known key found for this signature in database
GPG key ID: 181F5B95AE30B336

View file

@ -2453,9 +2453,9 @@ that, an interactive form can specified."
"\nby `rcirc-buffer-process' and `rcirc-target' will be used.")
(interactive (list ,@interactive-spec))
(unless (if (listp ,argument)
(not (<= ,required (length ,argument) ,total))
(<= ,required (length ,argument) ,total)
(string-match ,regexp ,argument))
(user-error "Malformed input (%s): %S" ,command ',arguments))
(user-error "Malformed input (%s): %S" ',command ',argument))
(let ((process (or process (rcirc-buffer-process)))
(target (or target rcirc-target)))
(ignore target process)