diff options
| -rw-r--r-- | editors/emacs/bqn-input.el | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/editors/emacs/bqn-input.el b/editors/emacs/bqn-input.el index a0230245..82c0184b 100644 --- a/editors/emacs/bqn-input.el +++ b/editors/emacs/bqn-input.el @@ -30,23 +30,22 @@ (define-key map [menu-bar bqn] (cons "BQN" (make-sparse-keymap "BQN"))) map)) -(defun bqn--make-bqn-mode-map () - (bqn--make-base-mode-map bqn-mode-map-prefix)) +;; value gets updated by initialization of bqn-mode-map-prefix +(defvar bqn--mode-map nil + "The keymap for ‘bqn-mode’.") (defun bqn--set-mode-map-prefix (symbol new) "Recreate the prefix and the keymap." (set-default symbol new) - (setq bqn--mode-map (bqn--make-bqn-mode-map))) + (setq bqn--mode-map (bqn--make-base-mode-map new))) (defcustom bqn-mode-map-prefix "s-" "The keymap prefix for ‘bqn--mode-map’ used both to store the new value using - ‘set-create’ and to update ‘bqn--mode-map’ using `bqn--make-bqn-mode-map'. + ‘set-create’ and to update ‘bqn--mode-map’ using `bqn--make-base-mode-map'. Kill and re-start your BQN buffers to reflect the change." :type 'string :group 'bqn - :set 'bqn--set-mode-map-prefix) - -(defvar bqn--mode-map (bqn--make-bqn-mode-map) - "The keymap for ‘bqn-mode’.") + :set 'bqn--set-mode-map-prefix + :initialize 'custom-initialize-set) (provide 'bqn-input) |