diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2010-02-21 08:26:28 +0100 |
|---|---|---|
| committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-02-21 08:26:28 +0100 |
| commit | ec11ff6f72cdc2defce26572d76e7e55727e867c (patch) | |
| tree | 66733ecdfe7973632d3f923a647f3bc82b77178b | |
| parent | c4a459aa7a2fbdc5dc20d2da7925b1b749baa4ac (diff) | |
| download | org-mode-ec11ff6f72cdc2defce26572d76e7e55727e867c.tar.gz | |
Fix agenda csv export to show full time
Max Mustermann writes:
> Org-mode version 6.21b in GNU Emacs 23.1.1 (i486-pc-linux-gnu, GTK+
> Version 2.18.3) of 2009-11-10 on vernadsky, modified by Debian.
>
> The Org entry:
>
> * Appointments :work:
> #+CATEGORY: Appt
> ** Testing <2010-02-20 Sat 22:00-23:30>
>
> produces the following incomplete output with org-batch-agenda-csv :
>
> emacs -batch -l ~/.emacs -eval '(org-batch-agenda-csv "a"
> org-agenda-ndays 1)'
> Appt,Testing,timestamp,,work,2010-2-20,2200,,,1000,2010-2-20
>
> whereas the output of org-batch-agenda shows the correct time:
>
> emacs -batch -l ~/.emacs -eval '(org-batch-agenda "a" org-agenda-ndays 1)'
> Appt: 22:00-23:30 Testing :work::
| -rwxr-xr-x | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/org-agenda.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9cc80e4..dd789d9 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-02-21 Carsten Dominik <carsten.dominik@gmail.com> + + * org-agenda.el (org-batch-agenda-csv): Use the time property + instead of the `time-of-day' property. + 2010-02-20 Carsten Dominik <carsten.dominik@gmail.com> * org-timer.el (org-timer-start-hook, org-timer-stop-hook) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 8bfbef4..30c6efd 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -2286,7 +2286,7 @@ agenda-day The day in the agenda where this is listed" (princ (org-encode-for-stdout (mapconcat 'org-agenda-export-csv-mapper - '(org-category txt type todo tags date time-of-day extra + '(org-category txt type todo tags date time extra priority-letter priority agenda-day) ","))) (princ "\n")))))) |