[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] Publishing clocked time

From: Ivan Chernetsky
Subject: [Orgmode] Publishing clocked time
Date: Fri, 4 Sep 2009 18:32:43 +0300


is it possible to publish clocked time of a TODO item? For instance, I
have a TODO item like this:

** TODO <todo item title>   :NEXT:
   - State "STARTED"  from "TODO"  [2009-09-04 Fri 15:56]
   - State "STARTED"    from "TODO"       [2009-09-04 Fri 14:52]
   CLOCK: [2009-09-04 Fri 14:52]--[2009-09-04 Fri 15:56] =>  1:04

When I publish a project that contains a file with this item, I
doesn't see last line with clocked time info. I have the following
settings regarding publishing:

(setq org-clock-persist t)
(setq org-clock-in-resume t)
(setq org-clock-into-drawer nil)
(setq org-clock-out-remove-zero-time-clocks t)
(setq org-clock-out-when-done nil)
(setq org-agenda-log-mode-items '(clock))

(setq org-todo-keywords '((sequence "TODO(t)" "STARTED(s!)" "|" "DONE(d!/!)")
                          (sequence "WAITING(w@/!)" "SOMEDAY(S!)" "|" 
(setq org-use-fast-todo-selection t)
(setq org-todo-state-tags-triggers
      '(("CANCELED" ("CANCELLED" . t))
        ("WAITING" ("WAITING" . t) ("NEXT"))
        ("SOMEDAY" ("WAITING" . t))
        ("DONE" ("NEXT") ("WAITING"))
        ("TODO" ("WAITING") ("CANCELLED"))
        ("STARTED" ("WAITING") ("NEXT" . t))))
(setq org-tag-alist
      '(("NEXT" . ?N)
        ("WAITING" . ?W)
        ("CANCELLED" . ?C)))
(setq org-fast-tag-selection-single-key 'expert)
(setq org-agenda-custom-commands
      '(("s" "Started Tasks" todo "STARTED"
((org-agenda-todo-ignore-with-date nil)))
        ("w" "Tasks waiting on something" tags "WAITING"
((org-use-tag-inheritance nil)))
        ("n" "Next" tags "NEXT-WAITING-CANCELLED/!" nil)))
(setq org-agenda-repeating-timestamp-show-all t)
(setq org-agenda-show-all-dates t)
(setq org-agenda-sorting-strategy
      '((agenda time-up priority-down effort-up category-up)
        (todo priority-down)
        (tags priority-down)))

;; (setq org-agenda-include-diary t)
;; (setq org-agenda-include-all-todo t)

(setq org-agenda-files '("~/org/work/dooster.org"))
(setq org-directory "~/org/")

;; publishing
(setq org-publish-project-alist
         :base-directory "~/org/work"
         :publishing-directory "~/org/published/work"
         :recursive t
         :base-extension "org"
         :publishing-function org-publish-org-to-html
         :auto-index t)))
(setq org-export-author-info nil)
(setq org-export-creator-info nil)
(setq org-export-html-use-infojs nil)
(setq org-export-with-drawers t)
(setq org-export-html-inline-images t)

Thanks in advance!

reply via email to

[Prev in Thread] Current Thread [Next in Thread]