more comments and docstrings
diff --git a/kanban.el b/kanban.el --- a/kanban.el +++ b/kanban.el @@ -73,7 +73,7 @@ (let ((words org-todo-keywords-1)) (nth (- column 1) words))) -;; Fill the kanban table with tasks from the +;; Fill the kanban table with tasks with corresponding TODO states from org files (defun kanban-zero (column row &optional match scope) "Zero-state Kanban board: This Kanban board just displays all org-mode headers which have a TODO state in their respective TODO @@ -105,11 +105,14 @@ (equal elem nil) "" elem))) +; Fill the first row with TODO items, except if they exist in other cels (defun kanban-todo (column cels &optional match scope) "Kanban TODO item grabber. Fills the first row of the kanban table with org-mode TODO entries, if they are not in another cell of the table. This allows you to set the state manually and just -use org-mode to supply new TODO entries." +use org-mode to supply new TODO entries. + +Gets the COLUMN and all other CELS via TBLFM ($# and @2$2..@>$>) and can get a string as MATCH to select only entries with a matching tag, as well as a list of org-mode files as the SCOPE to search for tasks." (let ((elem (nth (- column 2) (delete nil (org-map-entries (lambda