Re: [O] error while creating agenda clocktable
Hi Rainer, The presence of the file column in the clocktable depends on the scope. Removing the headline column is not an option, I don't see many cases were it would be useful, except corner-cases. Rainer Stengele writes: > In the past I just copied the org-clocktable-write-default and > modified it brutally in order to just output my 2 needed columns. You can still do this. > That of course makes it sensitive to code changes.. For this code change, it's just a matter of adapting :tags and :match in your code, that should not be too difficult (crossing fingers). HTH, -- Bastien
Re: [O] error while creating agenda clocktable
Am 27.04.2018 um 15:47 schrieb Bastien: Hi Rainer, Rainer Stengele writes: I will copy the new function and modify it to fit my needs. Thanks for this - please share your experience so that we can better guide people in updating their code. The only backward-incompatible change is that :tags is now :match and :tags can now be nil or t to allow to insert tags. You might also want to test the new feature. Thanks, Hi Bastien, thanks for the request, I am glad to do do. What I really want is a very simple clocktable in my agenda view: Only 2 columns, CATEGORY, the total clocked time and the sum of clocked time for each CATEGORY in the agenda view. Using the standard org-clocktable-write-default I see this: |---+---+---+--| | | GESAMT| *Gesamtdauer* | *2:45* | |---+---+---+--| | Projectmanagement.org | *Dateizeit* | * | * | | | project 1 | *project 1: Projektmanagement* | 0:15 | | | project 2 | *project 2: Projektmanagement* | 1:15 | .. .. my goal is to end up with column 2 and 4: |---+--| | CATEGORY | *2:45* | |---+--| | *Dateizeit* |* | | project 1 | 0:15 | | project 2 | 1:15 | as I only use 1 project org file and only 1 headline under which I clock my project time. I would of course be more than happy to have new clocktable options to inhibit the filename column and also the headline lock column, not sure how that is named in the code. In the past I just copied the org-clocktable-write-default and modified it brutally in order to just output my 2 needed columns. That of course makes it sensitive to code changes.. Thank you. Regards, Rainer
Re: [O] error while creating agenda clocktable
Hi Rainer, Rainer Stengele writes: > I will copy the new function and modify it to fit my needs. Thanks for this - please share your experience so that we can better guide people in updating their code. The only backward-incompatible change is that :tags is now :match and :tags can now be nil or t to allow to insert tags. You might also want to test the new feature. Thanks, -- Bastien
Re: [O] error while creating agenda clocktable
Hi Bastien,
I see that org-clocktable-write-default has been modified quite a bit.
I will copy the new function and modify it to fit my needs.
So please consider this case closed.
Thank you.
Regards, Rainer
Am 27.04.2018 um 14:05 schrieb Rainer Stengele:
Hi Bastien,
I am addressing you because I read that something changed with the agenda
clocktables.
Maybe related to that E-Mail:
Subject: Re: agenda clockreport -- include tags?
Date: Fri, 27 Apr 2018 01:34:50 +0200
After updating today I cannot get the agenda clocktable anymore.
I use my own formatter function rst/org-clocktable-write-default, which worked
fine before.
Can you please look into this?
Error message see here:
Debugger entered--Lisp error: (wrong-type-argument listp 15)
assoc("CATEGORY" 15)
(cdr (assoc p (nth 4 entry)))
(or (cdr (assoc p (nth 4 entry))) "")
(closure ((tcol) (narrow-cut-p) (content) (recalc) (headline . #("*Helbako-RO-BMW: Projektmanagement*" 0 1 (:org-clock-minutes 15
wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "Helbako-RO-BMW" invisible org-link org-emphasis t font-lock-multiline
t face (bold org-level-1) fontified t) 1 34 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category
"Helbako-RO-BMW" org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t) 34 35 (:org-clock-minutes 15 wrap-prefix #("* " 0
2 (face org-indent)) line-prefix "" org-category "Helbako-RO-BMW" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 .
org-mouse-move-tree) (C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face)
(mouse-3) (mouse-2 . org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold
org-level-1) fontified t))) (entry 1 #("*Helbako-RO-BMW: Projektmanagement*" 0 1 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face
org-indent)) line-prefix "" org-category "Helbako-RO-BMW" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1)
fontified t) 1 34 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "Helbako-RO-BMW" org-emphasis
t font-lock-multiline t face (bold org-level-1) fontified t) 34 35 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "Helbako-RO-BMW" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 . org-mouse-move-tree)
(C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face) (mouse-3) (mouse-2 .
org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t)) nil
nil 15 (("CATEGORY" . "Helbako-RO-BMW"))) (entries (1 #("*Waltron: Projektmanagement*" 0 1 (:org-clock-minutes 75 wrap-prefix #("* " 0 2
(face org-indent)) line-prefix "" org-category "Waltron" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1)
fontified t) 1 27 (:org-clock-minutes 75 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "Waltron" org-emphasis t
font-lock-multiline t face (bold org-level-1) fontified t) 27 28 (:org-clock-minutes 75 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "Waltron" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 . org-mouse-move-tree)
(C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face) (mouse-3) (mouse-2 .
org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t)) nil
nil 75 (("CATEGORY" . "Waltron"))) (1 #("*00 - Project Managament - general*" 0 1 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face
org-indent)) line-prefix "" org-category "PM - daily" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1)
fontified t) 1 34 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "PM - daily" org-emphasis t
font-lock-multiline t face (bold org-level-1) fontified t) 34 35 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "PM - daily" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 . org-mouse-move-tree)
(C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face) (mouse-3) (mouse-2 .
org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t)) nil
nil 15 (("CATEGORY" . "PM - daily"))) (1 #("*00 - PM Special*" 0 1 (:org-clock-minutes 60 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "PM - special" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t) 1 16
(:org-clock-minutes 60 wrap-prefix #("* " 0
[O] error while creating agenda clocktable
Hi Bastien,
I am addressing you because I read that something changed with the agenda
clocktables.
Maybe related to that E-Mail:
Subject: Re: agenda clockreport -- include tags?
Date: Fri, 27 Apr 2018 01:34:50 +0200
After updating today I cannot get the agenda clocktable anymore.
I use my own formatter function rst/org-clocktable-write-default, which worked
fine before.
Can you please look into this?
Error message see here:
Debugger entered--Lisp error: (wrong-type-argument listp 15)
assoc("CATEGORY" 15)
(cdr (assoc p (nth 4 entry)))
(or (cdr (assoc p (nth 4 entry))) "")
(closure ((tcol) (narrow-cut-p) (content) (recalc) (headline . #("*Helbako-RO-BMW: Projektmanagement*" 0 1 (:org-clock-minutes 15
wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "Helbako-RO-BMW" invisible org-link org-emphasis t font-lock-multiline
t face (bold org-level-1) fontified t) 1 34 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category
"Helbako-RO-BMW" org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t) 34 35 (:org-clock-minutes 15 wrap-prefix #("* " 0
2 (face org-indent)) line-prefix "" org-category "Helbako-RO-BMW" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 .
org-mouse-move-tree) (C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face)
(mouse-3) (mouse-2 . org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold
org-level-1) fontified t))) (entry 1 #("*Helbako-RO-BMW: Projektmanagement*" 0 1 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face
org-indent)) line-prefix "" org-category "Helbako-RO-BMW" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1)
fontified t) 1 34 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "Helbako-RO-BMW" org-emphasis
t font-lock-multiline t face (bold org-level-1) fontified t) 34 35 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "Helbako-RO-BMW" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 . org-mouse-move-tree)
(C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face) (mouse-3) (mouse-2 .
org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t)) nil
nil 15 (("CATEGORY" . "Helbako-RO-BMW"))) (entries (1 #("*Waltron: Projektmanagement*" 0 1 (:org-clock-minutes 75 wrap-prefix #("* " 0 2
(face org-indent)) line-prefix "" org-category "Waltron" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1)
fontified t) 1 27 (:org-clock-minutes 75 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "Waltron" org-emphasis t
font-lock-multiline t face (bold org-level-1) fontified t) 27 28 (:org-clock-minutes 75 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "Waltron" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 . org-mouse-move-tree)
(C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face) (mouse-3) (mouse-2 .
org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t)) nil
nil 75 (("CATEGORY" . "Waltron"))) (1 #("*00 - Project Managament - general*" 0 1 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face
org-indent)) line-prefix "" org-category "PM - daily" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1)
fontified t) 1 34 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "PM - daily" org-emphasis t
font-lock-multiline t face (bold org-level-1) fontified t) 34 35 (:org-clock-minutes 15 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "PM - daily" keymap (keymap (down-mouse-3 . org-mouse-move-tree-start) (drag-mouse-3 . org-mouse-move-tree)
(C-down-mouse-1 . org-mouse-move-tree-start) (C-drag-mouse-1 . org-mouse-move-tree) (follow-link . mouse-face) (mouse-3) (mouse-2 .
org-open-at-mouse)) mouse-face highlight invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t)) nil
nil 15 (("CATEGORY" . "PM - daily"))) (1 #("*00 - PM Special*" 0 1 (:org-clock-minutes 60 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "PM - special" invisible org-link org-emphasis t font-lock-multiline t face (bold org-level-1) fontified t) 1 16
(:org-clock-minutes 60 wrap-prefix #("* " 0 2 (face org-indent)) line-prefix "" org-category "PM - special" org-emphasis t
font-lock-multiline t face (bold org-level-1) fontified t) 16 17 (:org-clock-minutes 60 wrap-prefix #("* " 0 2 (face org-indent))
line-prefix "" org-category "PM - special" keymap (k
