FIX: If the matcher is nil, use the TODO.
diff --git a/kanban.el b/kanban.el
--- a/kanban.el
+++ b/kanban.el
@@ -75,10 +75,10 @@
(if (not (member keyword (split-string cleanline " ")))
nil
(concat "[[" cleanline "][" clean "]]" )))))))
- match 'agenda)))))
+ (if match match (concat "TODO=\"" (nth 0 org-todo-keywords-1) "\""))
+ 'agenda)))))
(if
- (or (member elem
- (list cels)) (equal elem nil))
- "" elem)))
+ (or (member elem (list cels)) (equal elem nil))
+ " " elem)))
-(provide 'kanban)
\ No newline at end of file
+(provide 'kanban)