diff options
| -rw-r--r-- | editors/emacs/bqn-input.el | 7 | ||||
| -rw-r--r-- | editors/emacs/bqn-symbols.el | 2 |
2 files changed, 1 insertions, 8 deletions
diff --git a/editors/emacs/bqn-input.el b/editors/emacs/bqn-input.el index 2ad842c5..4e847094 100644 --- a/editors/emacs/bqn-input.el +++ b/editors/emacs/bqn-input.el @@ -15,12 +15,6 @@ bqn--symbols)))) (make-insert-functions)) -(defun bqn-insert-spc () - "Insert a space. This is needed so that one can type a space -character when using the super-prefixed characters." - (interactive) - (insert " ")) - (defun bqn--kbd (definition) (if (functionp #'kbd) (kbd definition) @@ -32,7 +26,6 @@ character when using the super-prefixed characters." (let ((key-sequence (caddr command))) (dolist (s (if (listp key-sequence) key-sequence (list key-sequence))) (define-key map (bqn--kbd (concat prefix s)) (bqn--make-key-command-sym (car command)))))) - (define-key map (kbd (concat prefix "SPC")) 'bqn-insert-spc) (define-key map [menu-bar bqn] (cons "BQN" (make-sparse-keymap "BQN"))) map)) diff --git a/editors/emacs/bqn-symbols.el b/editors/emacs/bqn-symbols.el index a016a0a3..aede9dc8 100644 --- a/editors/emacs/bqn-symbols.el +++ b/editors/emacs/bqn-symbols.el @@ -139,7 +139,7 @@ ("left-double-arrow" "⇐" "?") ;; Space bar - ("ligature" "‿" " ") + ("ligature" "‿" "SPC") )) (provide 'bqn-symbols) |