Add rotate package for window/template placement leader keys

dustinlyons · Aug 9, 2021 · b36f77c · b36f77c
1 parent 9d87265
commit b36f77c
Show file tree

Hide file tree

Showing 2 changed files with 15 additions and 9 deletions.
diff --git a/emacs/.emacs.d/config.el b/emacs/.emacs.d/config.el
@@ -182,11 +182,11 @@
   ;; Fast access to tag common contexts I use
   (setq org-tag-alist '(("@inbox" . ?i) ("@home" . ?h) ("@computer" . ?c) ("@phone" . ?p)))
 
-(add-hook 'org-finalize-agenda-hook
+(add-hook 'org-agenda-finalize-hook
   (lambda ()
     (save-excursion
-      (color-org-header "2021-08-01:" "azure" "black")
-      (color-org-header "2021-08-05:" "RosyBrown1" "red"))))
+      (color-org-header "2021-08-01" "azure" "black")
+      (color-org-header "2021-08-05" "RosyBrown1" "red"))))
 
 (defun color-org-header (tag backcolor forecolor)
   ""

diff --git a/emacs/.emacs.d/config.org b/emacs/.emacs.d/config.org
@@ -620,15 +620,21 @@ This is what makes emacs possible for me. All evil mode packages and related con
 
 #+END_SRC
 
-** Utility packages
+** Utility packages and functions
 Various helpers and packages I find useful.
 
-*** Google
+*** Rotate
 #+BEGIN_SRC emacs-lisp
-  ;; You can probably guess
-  (use-package google-this
-    :config
-    (google-this-mode 1))
+
+  ;; Rotates windows and layouts
+  (use-package rotate
+    :config)
+
+  (dl/leader-keys
+    "r"  '(:ignore t :which-key "rotate")
+    "rw"  '(rotate-window :which-key "rotate window")
+    "rl"  '(rotate-layout :which-key "rotate layout"))
+
 #+END_SRC
 
 ** Managing projects