Fix function calls
This commit is contained in:
parent
21d53603b1
commit
298fd65a4c
|
@ -22,7 +22,7 @@ Will just do \\[beginning-of-line] in one of
|
|||
(if (apply #'derived-mode-p +mwim-passthrough-modes)
|
||||
(let ((this-mode-map (symbol-value (intern (format "%s-map" major-mode))))
|
||||
(key "C-a"))
|
||||
(funcall (or (keymap-lookup this-mode-map key t t)
|
||||
(call-interactively (or (keymap-lookup this-mode-map key t t)
|
||||
(keymap-lookup (current-global-map) key t t))))
|
||||
(call-interactively #'mwim-beginning)))
|
||||
|
||||
|
@ -34,7 +34,7 @@ Will just do \\[end-of-line] in one of
|
|||
(if (apply #'derived-mode-p +mwim-passthrough-modes)
|
||||
(let ((this-mode-map (symbol-value (intern (format "%s-map" major-mode))))
|
||||
(key "C-e"))
|
||||
(funcall (or (keymap-lookup this-mode-map key t t)
|
||||
(call-interactively (or (keymap-lookup this-mode-map key t t)
|
||||
(keymap-lookup (current-global-map) key t t))))
|
||||
(call-interactively #'mwim-end)))
|
||||
|
||||
|
|
Loading…
Reference in New Issue