diff options
| author | Philip Kaludercic | 2021-11-14 19:41:31 +0100 |
|---|---|---|
| committer | Philip Kaludercic | 2021-11-14 19:41:31 +0100 |
| commit | 044dd1e21028fad3cf8d976dae887503dbab6ae3 (patch) | |
| tree | 9bd8e2e46376f9009a00f2f8b5dee57136511925 | |
| parent | 97059bcdffe722ab92ca39209c3a3b62144b19a1 (diff) | |
| download | emacs-044dd1e21028fad3cf8d976dae887503dbab6ae3.tar.gz emacs-044dd1e21028fad3cf8d976dae887503dbab6ae3.zip | |
* rcirc.el (rcirc-define-command): Fix interactive-spec generation
* rcirc.el (rcirc-define-command): Wrap interactive spec in a list call.
| -rw-r--r-- | lisp/net/rcirc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index 52d74a33945..5c92c60eda2 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el | |||
| @@ -2583,7 +2583,7 @@ that, an interactive form can specified." | |||
| 2583 | ,(concat documentation | 2583 | ,(concat documentation |
| 2584 | "\n\nNote: If PROCESS or TARGET are nil, the values given" | 2584 | "\n\nNote: If PROCESS or TARGET are nil, the values given" |
| 2585 | "\nby `rcirc-buffer-process' and `rcirc-target' will be used.") | 2585 | "\nby `rcirc-buffer-process' and `rcirc-target' will be used.") |
| 2586 | (interactive ,interactive-spec) | 2586 | (interactive (list ,interactive-spec)) |
| 2587 | (unless (if (listp ,argument) | 2587 | (unless (if (listp ,argument) |
| 2588 | (<= ,required (length ,argument) ,total) | 2588 | (<= ,required (length ,argument) ,total) |
| 2589 | (string-match ,regexp ,argument)) | 2589 | (string-match ,regexp ,argument)) |