Add keybind to open org-directory

This commit is contained in:
Evie Litherland-Smith 2024-02-15 13:01:55 +00:00
parent 9f6edcc1b8
commit 89b975cb01

View file

@ -29,16 +29,6 @@
scroll-margin 0 scroll-margin 0
scroll-preserve-screen-position 1) scroll-preserve-screen-position 1)
;; Config file shortcut
(defun my/open-init-file ()
"Open emacs init file"
(interactive)
(find-file (locate-user-emacs-file "init.el")))
(keymap-global-set "C-c w c" #'my/open-init-file)
;; Scratch buffer shortcut
(keymap-global-set "C-c w x" #'scratch-buffer)
;; Bind normal forward/back buttons on mouse to next/previous buffer respectively ;; Bind normal forward/back buttons on mouse to next/previous buffer respectively
(keymap-global-set "<mouse-8>" #'previous-buffer) (keymap-global-set "<mouse-8>" #'previous-buffer)
@ -83,6 +73,26 @@
(recentf-max-saved-items 2048)) (recentf-max-saved-items 2048))
#+end_src #+end_src
* Frequent buffer shortcuts
#+begin_src emacs-lisp
;; Config file shortcut
(defun my/open-init-file ()
"Open emacs init file"
(interactive)
(find-file (locate-user-emacs-file "init.el")))
(keymap-global-set "C-c w c" #'my/open-init-file)
;; Scratch buffer shortcut
(keymap-global-set "C-c w x" #'scratch-buffer)
;; Org directory shortcut
(with-eval-after-load 'org
(defun my/open-org-directory ()
(interactive)
(find-file org-directory))
(keymap-global-set "C-c w o" #'my/open-org-directory))
#+end_src
* package-archive with priorities * package-archive with priorities
#+begin_src emacs-lisp :results output silent #+begin_src emacs-lisp :results output silent
(when (require 'package nil :noerror) (when (require 'package nil :noerror)