adding and edit emacs config keybinding

This commit is contained in:
Chris Cochrun 2022-03-25 16:44:29 -05:00
parent ffc856a587
commit fbbb6e385f
2 changed files with 23 additions and 6 deletions

View file

@ -372,6 +372,14 @@ This evil-collection package includes a lot of other evil based things.
:init :init
(general-evil-setup) (general-evil-setup)
:config :config
(defun chris/edit-emacs-config ()
"open the emacs config to edit"
(interactive)
(find-file (expand-file-name "README.org" user-emacs-directory)))
(defun chris/open-bible ()
"find a bible to open"
(interactive)
(find-file "~/org/bibles/"))
(general-create-definer chris/leader-keys (general-create-definer chris/leader-keys
:keymaps '(normal visual emacs) :keymaps '(normal visual emacs)
:prefix "SPC") :prefix "SPC")
@ -396,10 +404,11 @@ This evil-collection package includes a lot of other evil based things.
"tt" '(consult-theme :which-key "choose theme") "tt" '(consult-theme :which-key "choose theme")
"tl" '(toggle-truncate-lines :which-key "truncate lines") "tl" '(toggle-truncate-lines :which-key "truncate lines")
"ff" '(find-file :which-key "find file") "ff" '(find-file :which-key "find file")
"fb" '((find-file ~/org/bibles/) :which-key "find bible book") "fb" '(chris/open-bible :which-key "find bible book")
"fr" '(consult-recent-file :which-key "recent file") "fr" '(consult-recent-file :which-key "recent file")
"fs" '(save-buffer :which-key "save") "fs" '(save-buffer :which-key "save")
"fe" '(consult-file-externally :which-key "find file externally") "fE" '(consult-file-externally :which-key "find file externally")
"fe" '(chris/edit-emacs-config :which-key "open config")
"hf" '(helpful-callable :which-key "describe-function") "hf" '(helpful-callable :which-key "describe-function")
"hv" '(helpful-variable :which-key "describe-variable") "hv" '(helpful-variable :which-key "describe-variable")
"hk" '(helpful-key :which-key "describe-key") "hk" '(helpful-key :which-key "describe-key")

16
init.el
View file

@ -205,6 +205,14 @@
:init :init
(general-evil-setup) (general-evil-setup)
:config :config
(defun chris/edit-emacs-config ()
"open the emacs config to edit"
(interactive)
(find-file (expand-file-name "README.org" user-emacs-directory)))
(defun chris/open-bible ()
"find a bible to open"
(interactive)
(find-file "~/org/bibles/"))
(general-create-definer chris/leader-keys (general-create-definer chris/leader-keys
:keymaps '(normal visual emacs) :keymaps '(normal visual emacs)
:prefix "SPC") :prefix "SPC")
@ -229,10 +237,11 @@
"tt" '(consult-theme :which-key "choose theme") "tt" '(consult-theme :which-key "choose theme")
"tl" '(toggle-truncate-lines :which-key "truncate lines") "tl" '(toggle-truncate-lines :which-key "truncate lines")
"ff" '(find-file :which-key "find file") "ff" '(find-file :which-key "find file")
"fb" '((find-file ~/org/bibles/) :which-key "find bible book") "fb" '(chris/open-bible :which-key "find bible book")
"fr" '(consult-recent-file :which-key "recent file") "fr" '(consult-recent-file :which-key "recent file")
"fs" '(save-buffer :which-key "save") "fs" '(save-buffer :which-key "save")
"fe" '(consult-file-externally :which-key "find file externally") "fE" '(consult-file-externally :which-key "find file externally")
"fe" '(chris/edit-emacs-config :which-key "open config")
"hf" '(helpful-callable :which-key "describe-function") "hf" '(helpful-callable :which-key "describe-function")
"hv" '(helpful-variable :which-key "describe-variable") "hv" '(helpful-variable :which-key "describe-variable")
"hk" '(helpful-key :which-key "describe-key") "hk" '(helpful-key :which-key "describe-key")
@ -2033,8 +2042,7 @@ interfere with the default `bongo-playlist-buffer'."
'(safe-local-variable-values '(safe-local-variable-values
'((aggressive-indent-mode) '((aggressive-indent-mode)
(projectile-project-run-cmd . "./build/bin/presenter") (projectile-project-run-cmd . "./build/bin/presenter")
(projectile-project-compilation-cmd . "cmake -DCMAKE_EXPORT_COMPILE_COMMANDS=1 -B build/ . && make --dir build/") (projectile-project-compilation-cmd . "cmake -DCMAKE_EXPORT_COMPILE_COMMANDS=1 -B build/ . && make --dir build/"))))
(eval org-odt-styles-file "/home/chris/org/tfcexpenses2020.odt"))))
(custom-set-faces (custom-set-faces
;; custom-set-faces was added by Custom. ;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful. ;; If you edit it by hand, you could mess it up, so be careful.