Fix ttm-org-clear-all

This commit is contained in:
2021-05-27 23:02:27 -07:00
parent e15ed10c16
commit f2410093af

View File

@@ -82,10 +82,11 @@
;; Clear all todo statuses in org-mode. For Grocery list. ;; Clear all todo statuses in org-mode. For Grocery list.
(defun ttm-org-clear-all () (defun ttm-org-clear-all ()
(interactive) (interactive)
(goto-char 0)
(org-map-entries (org-map-entries
(lambda () (lambda ()
(org-todo ""))) (org-todo "")))
(flush-lines "CLOSED:") (flush-lines "CLOSED")
(message "Entries cleared.")) (message "Entries cleared."))
(map! :mode org-mode :localleader "C" :desc "Clear all todos" #'ttm-org-clear-all) (map! :mode org-mode :localleader "C" :desc "Clear all todos" #'ttm-org-clear-all)