Snoooopy/dtos-dotfiles
1
0
Fork 0
mirror of https://gitlab.com/dwt1/dotfiles.git synced 2026-04-24 12:00:24 +10:00
Code Issues Packages Projects Releases Wiki Activity

Fixing broken start-mode keybindings.

Browse Source
This commit is contained in:
Derek Taylor
2023-01-09 23:51:14 -06:00
parent 0a7a40c6ee
commit 483b222c3c
2 changed files with 30 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
.config/doom/config.el
View File

@@ -775,39 +775,40 @@
(setq initial-buffer-choice "~/.config/doom/start.org") (setq initial-buffer-choice "~/.config/doom/start.org")
(defun open-config-org() (defun dt/open-config-org ()
(interactive) (interactive)
(find-file "~/.config/doom/config.org")) (find-file "~/.config/doom/config.org"))
(defun open-init-el() (defun dt/open-init-el ()
(interactive) (interactive)
(find-file "~/.config/doom/init.el")) (find-file "~/.config/doom/init.el"))
(defun open-packages-el() (defun dt/open-packages-el ()
(interactive) (interactive)
(find-file "~/.config/doom/packages.el")) (find-file "~/.config/doom/packages.el"))
(defun open-eshell-aliases() (defun dt/open-eshell-aliases ()
(interactive) (interactive)
(find-file "~/.config/doom/eshell/aliases.el")) (find-file "~/.config/doom/eshell/aliases.el"))
(defun open-eshell-profile() (defun dt/open-eshell-profile ()
(interactive) (interactive)
(find-file "~/.config/doom/eshell/profile.el")) (find-file "~/.config/doom/eshell/profile.el"))
(define-minor-mode start-mode (define-minor-mode start-mode
"Provide functions for custom start page." "Provide functions for custom start page."
:lighter " start") :lighter " start"
:keymap (let ((map (make-sparse-keymap)))
;;(define-key map (kbd "M-z") 'eshell)
(evil-define-key 'normal start-mode-map (evil-define-key 'normal start-mode-map
(kbd "1") 'open-config-org (kbd "1") 'dt/open-config-org
(kbd "2") 'open-init-el (kbd "2") 'dt/open-init-el
(kbd "3") 'open-packages-el (kbd "3") 'dt/open-packages-el
(kbd "4") 'open-eshell-aliases (kbd "4") 'dt/open-eshell-aliases
(kbd "5") 'open-eshell-profile) (kbd "5") 'dt/open-eshell-profile)
map))
(provide 'start-mode) (provide 'start-mode)
;;(require start-mode)
(map! :leader (map! :leader
(:prefix ("w" . "window") (:prefix ("w" . "window")

27
.config/doom/config.org
View File

@@ -1266,39 +1266,40 @@ Instead of using Doom's Dashboard or the Emacs Dashboard program, I have decided
#+begin_src emacs-lisp #+begin_src emacs-lisp
(setq initial-buffer-choice "~/.config/doom/start.org") (setq initial-buffer-choice "~/.config/doom/start.org")
(defun open-config-org() (defun dt/open-config-org ()
(interactive) (interactive)
(find-file "~/.config/doom/config.org")) (find-file "~/.config/doom/config.org"))
(defun open-init-el() (defun dt/open-init-el ()
(interactive) (interactive)
(find-file "~/.config/doom/init.el")) (find-file "~/.config/doom/init.el"))
(defun open-packages-el() (defun dt/open-packages-el ()
(interactive) (interactive)
(find-file "~/.config/doom/packages.el")) (find-file "~/.config/doom/packages.el"))
(defun open-eshell-aliases() (defun dt/open-eshell-aliases ()
(interactive) (interactive)
(find-file "~/.config/doom/eshell/aliases.el")) (find-file "~/.config/doom/eshell/aliases.el"))
(defun open-eshell-profile() (defun dt/open-eshell-profile ()
(interactive) (interactive)
(find-file "~/.config/doom/eshell/profile.el")) (find-file "~/.config/doom/eshell/profile.el"))
(define-minor-mode start-mode (define-minor-mode start-mode
"Provide functions for custom start page." "Provide functions for custom start page."
:lighter " start") :lighter " start"
:keymap (let ((map (make-sparse-keymap)))
;;(define-key map (kbd "M-z") 'eshell)
(evil-define-key 'normal start-mode-map (evil-define-key 'normal start-mode-map
(kbd "1") 'open-config-org (kbd "1") 'dt/open-config-org
(kbd "2") 'open-init-el (kbd "2") 'dt/open-init-el
(kbd "3") 'open-packages-el (kbd "3") 'dt/open-packages-el
(kbd "4") 'open-eshell-aliases (kbd "4") 'dt/open-eshell-aliases
(kbd "5") 'open-eshell-profile) (kbd "5") 'dt/open-eshell-profile)
map))
(provide 'start-mode) (provide 'start-mode)
;;(require start-mode)
#+end_src #+end_src
* WINNER MODE * WINNER MODE