diff options
| author | Gerd Möllmann | 2022-10-12 13:53:07 +0200 |
|---|---|---|
| committer | Gerd Möllmann | 2022-10-12 14:09:33 +0200 |
| commit | b3cdb8a3d3aba0ea537ecabd2900a3682e7c0660 (patch) | |
| tree | 8f20aa6cb1b0a1b1e6e24f8518697f8e12cd61c6 /test | |
| parent | 3e29407122da36e942c9a1c44e701f8aacae7c72 (diff) | |
| download | emacs-b3cdb8a3d3aba0ea537ecabd2900a3682e7c0660.tar.gz emacs-b3cdb8a3d3aba0ea537ecabd2900a3682e7c0660.zip | |
Intern keywords differently
Instead of something like (intern (format ":%s" ...)) do
(intern (format "%s" :keyword). Likewise in C.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/erc/resources/erc-d/erc-d.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/erc/resources/erc-d/erc-d.el b/test/lisp/erc/resources/erc-d/erc-d.el index d6082227c52..6cbe26bb8b4 100644 --- a/test/lisp/erc/resources/erc-d/erc-d.el +++ b/test/lisp/erc/resources/erc-d/erc-d.el | |||
| @@ -951,7 +951,7 @@ appearing among DIALOGS." | |||
| 951 | erc-d-match-handlers)))) | 951 | erc-d-match-handlers)))) |
| 952 | (pcase-dolist (`(,var . ,def) defaults) | 952 | (pcase-dolist (`(,var . ,def) defaults) |
| 953 | (push (or (plist-get kwds var) def) args) | 953 | (push (or (plist-get kwds var) def) args) |
| 954 | (push (intern (format ":dialog-%s" var)) args)) | 954 | (push (intern (format "dialog-%s" var) :keyword) args)) |
| 955 | (apply #'erc-d--start host service (or server-name erc-d-server-name) | 955 | (apply #'erc-d--start host service (or server-name erc-d-server-name) |
| 956 | args))) | 956 | args))) |
| 957 | 957 | ||