FIX: kanban: empty results showed an error
diff --git a/kanban.el b/kanban.el
--- a/kanban.el
+++ b/kanban.el
@@ -59,7 +59,7 @@
()
(let
((line (filter-buffer-substring (point) (line-end-position)))
- (keyword "❢"))
+ (keyword (nth 0 org-todo-keywords-1)))
(let ((cleanline (nth 1 (split-string line "* "))))
(let ((shortline (substring cleanline
(+ (length keyword) 1)
@@ -77,7 +77,8 @@
(concat "[[" cleanline "][" clean "]]" )))))))
match 'agenda)))))
(if
- (member elem
- (list cels)) "" elem)))
+ (or (member elem
+ (list cels)) (equal elem nil))
+ "" elem)))
(provide 'kanban)
\ No newline at end of file