add keybindings and optional work specific code

2026-07-02 10:52:16 -04:00
parent 0f27615c1c
commit 727f6bde07
3 changed files with 32 additions and 13 deletions
--- a/utils.el
+++ b/utils.el
@@ -13,3 +13,9 @@

 (defun hgh/set-box-cursor(&rest args)
  (setq-local cursor-type 'box))
+
+(defun hgh/update-projects ()
+  (interactive)
+  (let ((projects-root (concat (getenv "HOME") "/programming/projects/")))
+    (dolist (dir (directory-files projects-root t "^[^.]"))
+      (project-current t dir))))