add day job initial config

code/init.el

@@ -14,6 +14,11 @@
 (setq kmn/is-termux
       (string-suffix-p "Android" (string-trim (shell-command-to-string "uname -a"))))
 
+;; day job env?
+(setq kmn/is-dayjob
+  (string= "PCE" (getenv "USERDOMAIN"))
+)
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ; os specific config
 (when (eq system-type 'windows-nt)
@@ -25,6 +30,10 @@
     (add-to-list 'exec-path "C:/Users/mcros/OneDrive/Programs/PortableApps/sqlite3")
     (add-to-list 'exec-path "C:/Users/mcros/OneDrive/Programs/PortableApps/MultiMarkdown-Windows-6.6.0/bin")
 )
+(when kmn/is-dayjob
+    (setenv "HOME" "I:/")
+    (setq default-directory "I:/")
+)
 (when kmn/is-termux
     ; setup storage locations -- cheat so mobile/desktop look alike for file urls
     ;(setq user-init-file "/data/data/com.termux/files/home/storage/shared/.emacs")

common/workspaces.el

@@ -52,6 +52,31 @@
 )
 )
 
+(when kmn/is-dayjob
+(defun kmn/workspace-org ()
+  (interactive)
+  ; start with fresh frame
+  (delete-other-windows)
+  (kmn/kill-other-buffers)
+  (ignore-errors (kill-buffer "*scratch*"))
+  ; front load org-agenda so it doesnt reshuffle the frame layout on us
+  (org-agenda nil "r")
+  (split-window-below)
+  (next-multiframe-window)
+  ; show slipbox
+  (find-file "~/org/orgzly/_slipbox.org")
+  ; split window for additional file to show
+  (split-window-below)
+  (next-multiframe-window)
+  (find-file "~/org/_habits.org")
+  (find-file "~/org/_todo.org")
+  (find-file "~/org/_index.org")
+  ; switch to top of agenda window so most useful window is focused
+  (next-multiframe-window)
+  (goto-char 0)
+)
+)
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ; org-mode workspace for termux devices (mobile / android)
 (when (not kmn/is-dayjob)

org/config-org-agendas.el

@@ -90,6 +90,13 @@
     "~/org/orgzly/_slipbox.org"
 ))
 )
+(when kmn/is-dayjob
+(setq org-agenda-files (list 
+    "~/org/_index.org"
+    "~/org/_slipbox.org"
+    "~/org/_todo.org"
+))
+)
 
 (require 'org-super-agenda)
 (org-super-agenda-mode)
@@ -186,3 +193,43 @@
         )
 )
 )
+(when kmn/is-dayjob
+(setq org-super-agenda-groups
+       '(
+         (:name "Habits" :habit t)
+         (:name "Active"
+          :todo ("WIP" "READY"))
+         (:name "Slip Box" :tag "slipbox")
+         (:name "To Do" :priority>= "C")
+         (:name "Low Priority" :priority< "C")))
+
+(setq org-agenda-custom-commands
+      '(
+          ("r" "PCE"
+              (
+                  (agenda "" (
+                      (org-agenda-overriding-header "Scheduled")
+                      (org-agenda-remove-tags t)
+                  ))
+                  (agenda "" (
+                      (org-agenda-overriding-header "Habits")
+                      (org-agenda-files (list "~/org/_habits.org"))
+                      (org-agenda-remove-tags t)
+                  ))
+                  (todo "WIP" (
+                      (org-agenda-overriding-header "WIP")
+                      (org-agenda-remove-tags t)
+                  ))
+                  (todo "READY" (
+                      (org-agenda-overriding-header "Ready")
+                      (org-agenda-remove-tags t)
+                  ))
+                  (tags-todo "-TODO=\"WIP\"-TODO=\"READY\"" (
+                      (org-agenda-overriding-header "")
+                      (org-agenda-remove-tags t)
+                  ))
+               )
+          )
+        )
+)
+)

org/config-org-capture.el

@@ -168,3 +168,21 @@
     )
 ))
 )
+(when (not kmn/is-dayjob)
+(setq org-capture-templates '(
+    ("d" "TODO (Main)" entry
+        (file "~/org/_todo.org")
+        (file "~/org/template_todo.org")
+        :prepend t
+        :immediate-finish "f"
+        :jump-to-captured "t"
+    )
+    ("s" "TODO (Slipbox)" entry
+        (file "~/org/_slipbox.org")
+        (file "~/org/template_slipbox.org")
+        :prepend t
+        :immediate-finish "f"
+        :jump-to-captured "t"
+    )
+))
+)

org/config-org-keyboard.el

@@ -28,3 +28,11 @@
                 (lambda () (interactive) (find-file "~/org/culinary/_culinary.org"))
 )
 )
+(when kmn/is-dayjob
+(global-set-key (kbd "C-c t") 
+                (lambda () (interactive) (find-file "~/org/_todo.org"))
+)
+(global-set-key (kbd "C-c s") 
+                (lambda () (interactive) (find-file "~/org/_slipbox.org"))
+)
+)

org/init.el

@@ -13,6 +13,10 @@
 (require 'subr-x)
 (setq kmn/is-termux
       (string-suffix-p "Android" (string-trim (shell-command-to-string "uname -a"))))
+;; day job env?
+(setq kmn/is-dayjob
+  (string= "PCE" (getenv "USERDOMAIN"))
+)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ; os specific config
@@ -26,6 +30,10 @@
     (add-to-list 'exec-path "C:/msys64/usr/bin/unzip.exe")
     (setenv "PATH" (concat "C:\\msys64\\mingw64\\bin;" (getenv "PATH")))
 )
+(when kmn/is-dayjob
+    (setenv "HOME" "I:/")
+    (setq default-directory "I:/")
+)
 (when kmn/is-termux
     ; setup storage locations -- cheat so mobile/desktop look alike for file urls
     ;(setq user-init-file "/data/data/com.termux/files/home/storage/shared/.emacs")