add org-agenda-spin-project function: rearrange the order of the agen…

…da file to keep the project running evenly
TakesxiSximada · Apr 9, 2023 · 8770964 · 8770964
1 parent 36c5ccf
commit 8770964
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/init.el b/init.el
@@ -256,3 +256,11 @@
   (let ((proc (start-process "*SAY*" "*SAY*" "say" "--rate" "500")))
     (process-send-region proc (region-beginning) (region-end))
     (process-send-string proc "\n")))
+
+;; org-mode
+(defun org-agenda-spin-project ()
+  "Rearrange the order of the agenda file to keep the project running evenly"
+  (interactive)
+  (setq org-agenda-files
+	(append (cdr org-agenda-files)
+		(list (car org-agenda-files)))))