From 483b222c3ccc162f70be601c6519d712e52926c0 Mon Sep 17 00:00:00 2001 From: Derek Taylor Date: Mon, 9 Jan 2023 23:51:14 -0600 Subject: [PATCH] Fixing broken start-mode keybindings. --- .config/doom/config.el | 29 +++++++++++++++-------------- .config/doom/config.org | 29 +++++++++++++++-------------- 2 files changed, 30 insertions(+), 28 deletions(-) diff --git a/.config/doom/config.el b/.config/doom/config.el index abb8aa8..a62cd26 100644 --- a/.config/doom/config.el +++ b/.config/doom/config.el @@ -775,39 +775,40 @@ (setq initial-buffer-choice "~/.config/doom/start.org") -(defun open-config-org() +(defun dt/open-config-org () (interactive) (find-file "~/.config/doom/config.org")) -(defun open-init-el() +(defun dt/open-init-el () (interactive) (find-file "~/.config/doom/init.el")) -(defun open-packages-el() +(defun dt/open-packages-el () (interactive) (find-file "~/.config/doom/packages.el")) -(defun open-eshell-aliases() +(defun dt/open-eshell-aliases () (interactive) (find-file "~/.config/doom/eshell/aliases.el")) -(defun open-eshell-profile() +(defun dt/open-eshell-profile () (interactive) (find-file "~/.config/doom/eshell/profile.el")) (define-minor-mode start-mode "Provide functions for custom start page." - :lighter " start") - -(evil-define-key 'normal start-mode-map - (kbd "1") 'open-config-org - (kbd "2") 'open-init-el - (kbd "3") 'open-packages-el - (kbd "4") 'open-eshell-aliases - (kbd "5") 'open-eshell-profile) + :lighter " start" + :keymap (let ((map (make-sparse-keymap))) + ;;(define-key map (kbd "M-z") 'eshell) + (evil-define-key 'normal start-mode-map + (kbd "1") 'dt/open-config-org + (kbd "2") 'dt/open-init-el + (kbd "3") 'dt/open-packages-el + (kbd "4") 'dt/open-eshell-aliases + (kbd "5") 'dt/open-eshell-profile) + map)) (provide 'start-mode) -;;(require start-mode) (map! :leader (:prefix ("w" . "window") diff --git a/.config/doom/config.org b/.config/doom/config.org index e79b730..a11032c 100644 --- a/.config/doom/config.org +++ b/.config/doom/config.org @@ -1266,39 +1266,40 @@ Instead of using Doom's Dashboard or the Emacs Dashboard program, I have decided #+begin_src emacs-lisp (setq initial-buffer-choice "~/.config/doom/start.org") -(defun open-config-org() +(defun dt/open-config-org () (interactive) (find-file "~/.config/doom/config.org")) -(defun open-init-el() +(defun dt/open-init-el () (interactive) (find-file "~/.config/doom/init.el")) -(defun open-packages-el() +(defun dt/open-packages-el () (interactive) (find-file "~/.config/doom/packages.el")) -(defun open-eshell-aliases() +(defun dt/open-eshell-aliases () (interactive) (find-file "~/.config/doom/eshell/aliases.el")) -(defun open-eshell-profile() +(defun dt/open-eshell-profile () (interactive) (find-file "~/.config/doom/eshell/profile.el")) (define-minor-mode start-mode "Provide functions for custom start page." - :lighter " start") - -(evil-define-key 'normal start-mode-map - (kbd "1") 'open-config-org - (kbd "2") 'open-init-el - (kbd "3") 'open-packages-el - (kbd "4") 'open-eshell-aliases - (kbd "5") 'open-eshell-profile) + :lighter " start" + :keymap (let ((map (make-sparse-keymap))) + ;;(define-key map (kbd "M-z") 'eshell) + (evil-define-key 'normal start-mode-map + (kbd "1") 'dt/open-config-org + (kbd "2") 'dt/open-init-el + (kbd "3") 'dt/open-packages-el + (kbd "4") 'dt/open-eshell-aliases + (kbd "5") 'dt/open-eshell-profile) + map)) (provide 'start-mode) -;;(require start-mode) #+end_src * WINNER MODE