emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [O] Clocktable: Put summary line as table caption


From: Sebastien Vauban
Subject: Re: [O] Clocktable: Put summary line as table caption
Date: Tue, 02 Oct 2012 22:23:59 +0200
User-agent: Gnus/5.130006 (Ma Gnus v0.6) Emacs/24.1 (windows-nt)

Hello Nicolas,

Nicolas Goaziou wrote:
> "Sebastien Vauban" writes:
>> Looking at the presentation of the clocktable, I find that its "summary" line
>> should be converted into a caption, as any legend would be for any regular
>> table.
>>
>> You can see its effect:
>>
>> #+BEGIN: clocktable :maxlevel 1 :scope file
>> #+CAPTION: Clock summary at [2012-10-01 Mon 23:18]
>>
>> | Headline    | Time |
>> |-------------+------|
>> | Total time  | 4:00 |
>> |-------------+------|
>> | Development | 4:00 |
>> #+END:
>
> There shouldn't be any space between the caption an the table.

Here it is:

>From 5b990eeb2cd6f75a1292ff90c967019ce69fec98 Mon Sep 17 00:00:00 2001
From: Sebastien Vauban <address@hidden>
Date: Tue, 2 Oct 2012 22:20:36 +0200
Subject: [PATCH] Put the clocktable summary line as a CAPTION

* org-clock.el (org-clocktable-write-default): Insert the summary as a
  standard #+CAPTION keyword for the (clock) table.

TINYCHANGE
---
 lisp/org-clock.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index fc34bf9..e90c1d6 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -2349,13 +2349,14 @@ from the dynamic block definition."
      (or header
         ;; Format the standard header
         (concat
+         "#+CAPTION: "
          (nth 9 lwords) " ["
          (substring
           (format-time-string (cdr org-time-stamp-formats))
           1 -1)
          "]"
          (if block (concat ", for " range-text ".") "")
-         "\n\n")))
+         "\n")))

     ;; Insert the narrowing line
     (when (and narrow (integerp narrow) (not narrow-cut-p))
--
1.7.9

Best regards,
  Seb

-- 
Sebastien Vauban




reply via email to

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