Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Allow display of the DONE tasks #58

Open
yuri-urban opened this issue Jul 29, 2024 · 1 comment
Open

Allow display of the DONE tasks #58

yuri-urban opened this issue Jul 29, 2024 · 1 comment

Comments

@yuri-urban
Copy link

Hi, is it possible to add the ability to not hide the past DONE events, since I'd like to use the timeblock display for entering the time sheets at the end of the day, but once those are gone - I'd have to re-enable my day's tasks to "TODO" in order to see them all displayed again.

@yuri-urban
Copy link
Author

yuri-urban commented Aug 4, 2024

Commented couple of lines (see the ";" below) in the org-timeblock.el file, and it now shows me the "DONE" items as well. @ichernyshovvv is it possible to have this behavior as a variable setting?

(defun org-timeblock-get-buffer-entries-all (buffer)
  "Get all not done and not archived entries with any active timestamp in BUFFER."
  (let (entries tags
		update-markers-alist-p
		(buffer-markers
		 (alist-get buffer
			    org-timeblock-markers nil nil #'equal)))
    (with-current-buffer buffer
      (org-with-wide-buffer
       (goto-char (point-min))
       (while (re-search-forward org-tsr-regexp nil t)
	 (if (save-match-data
	       ;(or (org-entry-is-done-p)
		   (progn
		     (setq tags
			   (mapcar #'substring-no-properties
				   (org-get-tags)))
		     (member org-archive-tag tags))
		   ;)
	       )
	     (org-get-next-sibling)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

1 participant