rework org-mode workspace to avoid issues with agenda being in a side window

common/generic_functions.el

@@ -3,6 +3,7 @@
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ; open org agenda in top side window
+; BUGGED AND UNUSED, agenda does NOT work properly in side windows
 (defun kmn/org-agenda-on-top ()
   (defvar parameters
     '(window-parameters . ((no-other-window . t)

common/workspaces.el

@@ -25,10 +25,13 @@
 ; org-mode workspace
 (defun kmn/workspace-org ()
   (interactive)
-  ; front load org-agenda so it doesnt reshuffle the frame layout on us
-  (org-agenda nil "r")
   ; start with fresh frame
   (delete-other-windows)
+  (kmn/kill-other-buffers)
+  ; front load org-agenda so it doesnt reshuffle the frame layout on us
+  (org-agenda nil "r")
+  (split-window-below)
+  (next-multiframe-window)
   ; show kmn's slipbox
   (find-file "~/org/orgzly/_slipbox.org")
   ; split window for additional file to show
@@ -36,8 +39,7 @@
   (next-multiframe-window)
   ; show kmn health notes/data tracker
   (find-file "~/org/health/health_mike.org")
-  ; put agenda in top side window (works around org-mode limitations
+  ; switch to top of agenda window so most useful window is focused
-  (kmn/org-agenda-on-top)
   (next-multiframe-window)
   (goto-char 0)
 )