[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Orgmode] Re: Trouble setting variables in custom agenda command
From: |
Bernt Hansen |
Subject: |
[Orgmode] Re: Trouble setting variables in custom agenda command |
Date: |
Wed, 03 Jun 2009 15:10:08 -0400 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.2 (gnu/linux) |
Carsten Dominik <address@hidden> writes:
> Could anyone please try to reproduce this?
>
> Thanks.
>
> - Carsten
>
This works as described by Christopher for me.
GNU Emacs 22.2.1 (i486-pc-linux-gnu, X toolkit, Xaw3d scroll bars) of
2008-11-09 on raven, modified by Debian
Org-mode version 6.27trans (release_6.27a-52-g45d80c3)
| Keystrokes | Notes |
|-----------------------------+----------------------------------------------|
| emacs -q -l ~/minimal.emacs | Start emacs for testing |
| C-x C-f /tmp/x.x | Visit file with test setting |
| M-S-> | Go to bottom of file |
| C-x C-e | Execute - setting org-agenda-custom-commands |
| C-c a c | Run custom agenda "The Cycle" |
|-----------------------------+----------------------------------------------|
and it looks like this:
,----[ x.agenda.txt ]
| Day-agenda (W23):
| Wednesday 3 June 2009
| x: In -3 d.: TODO Test task
| x: In 2 d.: TODO First task
`----
I can turn on log mode with l to get this
,----[ x.agenda.txt ]
| Day-agenda (W23):
| Wednesday 3 June 2009
| 8:00...... ----------------
| x: 9:10- 9:12 Clocked: (0:02) TODO Test task - State "STARTED"
from "TODO" [2009-06-02 Tue 09:13]
| x: 9:13- 9:14 Clocked: (0:01) TODO Test task - State "STARTED"
from "TODO" [2009-06-02 Tue 09:13]
| 10:00...... ----------------
| 12:00...... ----------------
| 14:00...... ----------------
| 16:00...... ----------------
| 18:00...... ----------------
| 20:00...... ----------------
| x: In -3 d.: TODO Test task
| x: In 2 d.: TODO First task
`----
and turn on column mode with C-c C-x C-c to get this
,----[ x.agenda.txt ]
| Day-agenda (W23):
| Wednesday 3 June 2009
| 8:00...... ----------------
| x: 9:10- 9:12 Clocked: (0:02) TODO Test task - State "STARTED"
from "TODO" [2009-06-02 Tue 09:13]
| x: 9:13- 9:14 Clocked: (0:01) TODO Test task - State "STARTED"
from "TODO" [2009-06-02 Tue 09:13]
| 10:00...... ----------------
| 12:00...... ----------------
| 14:00...... ----------------
| 16:00...... ----------------
| 18:00...... ----------------
| 20:00...... ----------------
| x: In -3 d.: TODO Test task
| x: In 2 d.: TODO First task
`----
Test files follow:
,----[ minimal.emacs ]
| (add-to-list 'load-path (expand-file-name "~/git/org-mode/lisp"))
| (add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\|txt\\)$" .
org-mode))
| (require 'org-install)
| (global-set-key "\C-cl" 'org-store-link)
| (global-set-key "\C-ca" 'org-agenda)
| (global-set-key "\C-cb" 'org-iswitchb)
| (setq org-log-done (quote time))
| (setq org-log-into-drawer t)
| (setq org-agenda-files '("/tmp/x.org"))
`----
,----[ x.org ]
| #_STARTUP:
| * TODO First task
| DEADLINE: <2009-06-05 Fri>
| - Note taken on [2009-06-03 Wed 14:51] \\
| some log message
| * QUOTE foo
| Some test quote
| * TODO Test task
| DEADLINE: <2009-05-10 Sun +1w>
| - State "DONE" from "" [2009-06-03 Wed 14:50]
| :LOGBOOK:
| CLOCK: [2009-06-03 Wed 09:13]--[2009-06-03 Wed 09:14] => 0:01
| - State "STARTED" from "TODO" [2009-06-02 Tue 09:13]
| - State "DONE" from "STARTED" [2009-06-02 Tue 09:12]
| - State "STARTED" from "TODO" [2009-06-02 Tue 09:12]
| CLOCK: [2009-06-03 Wed 09:10]--[2009-06-03 Wed 09:12] => 0:02
| :END:
| * More stuff
`----
,----[ x.x ]
| (setq org-agenda-custom-commands
| '(("c" "The Cycle"
| ((agenda ""
| (
| (org-agenda-overriding-columns-format "%75ITEM
%7Effort{:} %7CLOCKSUM{Total} %15TAGS %SCHEDULED") ;; no
| (org-agenda-view-columns-initially t)
;; no
| (org-agenda-start-with-log-mode t)
;; no
| (org-agenda-ndays 1)
;; yes
| (org-agenda-skip-function
;; yes
| '(org-agenda-skip-entry-if 'notregexp "\\* TODO")))))
| nil nil)))
`----
-Bernt