From 67482cbe5bdb98eaaefcb5fa301c18bf23885cdf Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Fri, 14 Aug 2020 19:38:54 +0200 Subject: [PATCH] Geiser: Fix load order. --- .emacs.d/lisp/init-scheme.el | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/.emacs.d/lisp/init-scheme.el b/.emacs.d/lisp/init-scheme.el index 6632afa7..19038b0b 100644 --- a/.emacs.d/lisp/init-scheme.el +++ b/.emacs.d/lisp/init-scheme.el @@ -34,11 +34,12 @@ ;; Fontify debug buffer: (add-hook 'geiser-debug-mode-hook 'scheme-mode) ; TODO: Does not work? - (define-key geiser-repl-mode-map (kbd "C-c m") 'switch-to-geiser-module) - (define-key geiser-repl-mode-map (kbd "C-c C-m") nil) - ;; Bind same macro expansion keys in the REPL: - (define-key geiser-repl-mode-map (kbd "C-c C-m C-e") 'geiser-expand-last-sexp) - (define-key geiser-repl-mode-map (kbd "C-c C-m C-x") 'geiser-expand-definition) - (define-key geiser-repl-mode-map (kbd "C-c C-m C-r") 'geiser-expand-region)) + (with-eval-after-load 'geiser-repl + (define-key geiser-repl-mode-map (kbd "C-c m") 'switch-to-geiser-module) + (define-key geiser-repl-mode-map (kbd "C-c C-m") nil) + ;; Bind same macro expansion keys in the REPL: + (define-key geiser-repl-mode-map (kbd "C-c C-m C-e") 'geiser-expand-last-sexp) + (define-key geiser-repl-mode-map (kbd "C-c C-m C-x") 'geiser-expand-definition) + (define-key geiser-repl-mode-map (kbd "C-c C-m C-r") 'geiser-expand-region))) (provide 'init-scheme)