Nome do Emacs do mapa de teclado local atual?

Estou escrevendo uma função elisp que vincula permanentemente uma determinada chave a um determinado comando no mapa de teclas do modo principal atual. Por exemplo,

    (define-key python-mode-map [C-f1] 'python-describe-symbol)

O comando e a sequência de teclas são reunidos interativamente do usuário. No entanto, estou tendo problemas para produzir o nome do KEYMAP (por exemplo, 'python-mode-map') que corresponde ao modo principal atual.

Eu tentei a função (current-local-map), mas essa função retorna o objeto keymap em si, em vez de seu nome.

Eu entendo que muitos keymaps de modo principal são nomeados de acordo com a convenção '' major-mode-name'-mode-map ', no entanto, isso nem sempre é o caso (por exemplo, python-shell-map), então eu prefiro meu código não depende desta convenção. (Eu nem sei como acessar o nome do modo principal atual).

o(define-key ...) deve ser adicionado a um arquivo init, portanto,

(define-key (current-local-map) key command)

parece funcionar, ele não funciona como código em um arquivo de inicialização.

questionAnswers(3)

yourAnswerToTheQuestion