diff options
author | William Carroll <wpcarro@gmail.com> | 2020-01-08T15·16+0000 |
---|---|---|
committer | William Carroll <wpcarro@gmail.com> | 2020-01-17T10·56+0000 |
commit | ca8cb3fe218fab23ddb6e3a8262b7aa294e124cb (patch) | |
tree | 83888a4b1c6600855fdfa4f127b78992d9c20f46 /configs/shared/.emacs.d/wpc/window-manager.el | |
parent | a51afca1cc823d76470c0d04dbc7ddb3fa00d04a (diff) |
Support utils for finding Emacs dotfiles and Org files
Defined `dotfiles/find-emacs-file` and `org-helpers/find-file`, to clean up some of the `find-file` calls I have with long path names. This DRYs things up as well so that the path can be changed without breaking many other things.
Diffstat (limited to 'configs/shared/.emacs.d/wpc/window-manager.el')
-rw-r--r-- | configs/shared/.emacs.d/wpc/window-manager.el | 25 |
1 files changed, 14 insertions, 11 deletions
diff --git a/configs/shared/.emacs.d/wpc/window-manager.el b/configs/shared/.emacs.d/wpc/window-manager.el index 47419c5df93e..9f7beeecfafa 100644 --- a/configs/shared/.emacs.d/wpc/window-manager.el +++ b/configs/shared/.emacs.d/wpc/window-manager.el @@ -12,6 +12,10 @@ ;;; Code: +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; Dependencies +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + (require 'prelude) (require 'string) (require 'cycle) @@ -19,6 +23,8 @@ (require 'kbd) (require 'ivy-helpers) (require 'display) +(require 'dotfiles) +(require 'org-helpers) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Library @@ -579,8 +585,7 @@ Currently using super- as the prefix for switching workspaces." ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (progn (exwm/switch "Project") - ;; (find-file constants/current-project) - ) + (find-file constants/current-project)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Scratch ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -600,20 +605,17 @@ Currently using super- as the prefix for switching workspaces." ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (progn (exwm/switch "Todos") - ;; (find-file "~/Dropbox/org/today.org") + (org-helpers/find-file "today.org") (wpc/evil-window-vsplit-right) - ;; (find-file "~/Dropbox/org/emacs.org") - ) + (org-helpers/find-file "emacs.org")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Dotfiles ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (progn (exwm/switch "Dotfiles") - ;; TODO: Support (dotfiles/find-file "window-manager.el")? - ;; (find-file "~/Dropbox/dotfiles/configs/shared/.emacs.d/init.el") + (dotfiles/find-emacs-file "init.el") (wpc/evil-window-vsplit-right) - ;; (find-file "~/Dropbox/dotfiles/configs/shared/.emacs.d/wpc/window-manager.el") - ) + (dotfiles/find-emacs-file "wpc/window-manager.el")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Chatter ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -640,8 +642,9 @@ Currently using super- as the prefix for switching workspaces." ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Reset to default ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - (exwm/switch "Dotfiles") - ))) + (exwm/switch "Dotfiles")))) + + (provide 'window-manager) ;;; window-manager.el ends here |