diff options
| -rw-r--r-- | editors/emacs/bqn-backslash.el | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/editors/emacs/bqn-backslash.el b/editors/emacs/bqn-backslash.el index a667faff..8e130886 100644 --- a/editors/emacs/bqn-backslash.el +++ b/editors/emacs/bqn-backslash.el @@ -26,12 +26,8 @@ (let* ((prefix (string new)) (bqn--transcription-alist (cl-loop for command in bqn--symbols - for key-command = (cl-third command) - append (cl-loop for s in (if (listp key-command) - key-command - (list key-command)) - collect (cons (concat prefix s) - (cl-second command)))))) + collect (cons (concat prefix (cl-third command)) + (cl-second command))))) (quail-map-from-table '((default bqn--transcription-alist))))) (set-default symbol new)) |