Fix id filter taskwarrior-export with temporary workaround
This commit is contained in:
parent
77240a8751
commit
5164517e09
1 changed files with 3 additions and 4 deletions
|
@ -2,6 +2,7 @@
|
||||||
;;
|
;;
|
||||||
;; TODO: Implement modeline indicator for deadline and entries
|
;; TODO: Implement modeline indicator for deadline and entries
|
||||||
;; TODO: Update buffer if command modifies the state
|
;; TODO: Update buffer if command modifies the state
|
||||||
|
;; TODO: Extract "1-1000" id filter into variable
|
||||||
|
|
||||||
(require 'json)
|
(require 'json)
|
||||||
|
|
||||||
|
@ -42,10 +43,8 @@
|
||||||
|
|
||||||
(defun taskwarrior-export (filter)
|
(defun taskwarrior-export (filter)
|
||||||
"Export taskwarrior entries as JSON"
|
"Export taskwarrior entries as JSON"
|
||||||
(let ((filter (concat "id " filter))
|
|
||||||
(command "export"))
|
|
||||||
(json-read-from-string
|
(json-read-from-string
|
||||||
(taskwarrior--shell-command command filter))))
|
(taskwarrior--shell-command "export" filter)))
|
||||||
|
|
||||||
(defun taskwarrior-change-project (project)
|
(defun taskwarrior-change-project (project)
|
||||||
(interactive "sProject: ")
|
(interactive "sProject: ")
|
||||||
|
@ -86,7 +85,7 @@ the front and focus it. Otherwise, create one and load the data."
|
||||||
(forward-char)))))
|
(forward-char)))))
|
||||||
|
|
||||||
(defun taskwarrior-write-entries ()
|
(defun taskwarrior-write-entries ()
|
||||||
(let ((entries (append (taskwarrior-export "context:personal") nil)))
|
(let ((entries (append (taskwarrior-export "1-1000") nil)))
|
||||||
(dolist (entry entries)
|
(dolist (entry entries)
|
||||||
(progn
|
(progn
|
||||||
(insert (format
|
(insert (format
|
||||||
|
|
Loading…
Reference in a new issue