Emacs имя текущей локальной таблицы ключей?

Я пишу функцию elisp, которая постоянно привязывает данный ключ к данной команде в текущем основном режиме »Карта ключей. Например,

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

Команда и последовательность клавиш собираются в интерактивном режиме от пользователя. Однако у меня возникли проблемы при создании названия KEYMAP (например, 'питон-режим-карта»), что соответствует текущему основному режиму.

Я пробовал функцию (current-local-map), но эта функция возвращает сам объект раскладки, а не его имя.

Я понимаю, что многие таблицы основных режимов названы в соответствии с соглашениеммейджор-режим-имя»-mode-карта»однако это не всегда так (например, python-shell-map), поэтому я бы предпочел, чтобы мой код не полагался на это соглашение. (Я даже не уверен, как получить доступ к названию текущего основного режима).

(define-key ...) должен быть добавлен в файл инициализации, поэтому, хотя

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

кажется, работает, он не работает как код в файле инициализации.