emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [Orgmode] Re: Trouble setting variables in custom agenda command


From: Carsten Dominik
Subject: Re: [Orgmode] Re: Trouble setting variables in custom agenda command
Date: Thu, 4 Jun 2009 09:49:19 +0200

Hi,

wow, what a fantastic response to my request, thank
you all very much for contributing pieces to this puzzle.

There are several issues here.

1. Christopher did define his agenda command incorrectly (I know
   this variable is very complex... ).  You defined the command
   as a block agenda where in principle several agenda lists can
   be combined in a single view.  You can see this by setting
   org-agenda-custom-commands just to the single entry like Bernt
   did in his setup, and then try to customize this variable.

   A block agenda has *two* places where options can be stored.
   One set of options for just the individual command, and one
   set for for the block as a whole.  Things like
   org-agenda-start-with-column-view need to be set there, because
   they are only used in that final cleanup that happens in the
   second call to org-finalize-agenda, as Nick has described.

2. I had a bug for agenda series:  As Nick has pointed out,
   the agenda buffer is created and things like log-mode are set
   up before the options are scoped with let.  I have now fixed
   this, the buffer creation gets the *global* agenda series
   variables scoped as well.  Note: NOT the local ones.

Christopher, after getting the latest release with my fix,
there are now two possibilities how you can write
your command, to achieve what you wanted.

1. As this is only a single block, you can reformulate this
   as a single agenda command, not a series:


   (setq org-agenda-custom-commands
         '(("c" agenda nil
            (
(org-agenda-overriding-columns-format "%75ITEM %7Effort{:} %7CLOCKSUM{Total} %15TAGS %SCHEDULED")
             (org-agenda-view-columns-initially t)
             (org-agenda-start-with-log-mode t)
             (org-agenda-ndays 1)
             (org-agenda-skip-function
              '(org-agenda-skip-entry-if 'notregexp "\\* TODO"))))))


2. Keep it as a block in an agenda series, but then move the
   variables that are not specific for the block out:

   (setq org-agenda-custom-commands
         '(("c" "The Cycle"
            ((agenda
              ""
              ((org-agenda-ndays 1)
               (org-agenda-skip-function
                '(org-agenda-skip-entry-if 'notregexp "\\* TODO")))))
((org-agenda-overriding-columns-format "%75ITEM %7Effort{:} %7CLOCKSUM{Total} %15TAGS %SCHEDULED")
             (org-agenda-view-columns-initially t)
             (org-agenda-start-with-log-mode t)))))


   You may also move all the settings into the global options block
   in this case.

I do realize only now that the reason why you chose a block agenda
may have been so that you could give the command a name, which
is not possible in single commands.  I also realize now that
it was a mistake to not allow for a name also here.
But I am not sure if there is an easy way to fix this
without breaking legacy setups out there.

Thanks again to everyone.

If anyone has good proposals as to where to amend
the documentation in order to avoid this issue,
please let me know.

- Carsten

On Jun 4, 2009, at 12:59 AM, Nick Dokos wrote:

Nick Dokos <address@hidden> wrote:

[Bernt, thanks very much for taking the time to do the set-up: it makes
things so much easier!]

I've made a little progress debugging this in the case of the
org-agenda-start-with-log-mode variable: the doc for it says

,----
| org-agenda-start-with-log-mode is a variable defined in `org- agenda.el'.
| Its value is nil
|
| Documentation:
| The initial value of log-mode in a newly created agenda window.
|
| You can customize this variable.
`----

Note that *initial*: it is only used once, in org-agenda-mode, to
initialize org-agenda-show-log. So setting it in the definition of an agenda custom command (effectively in a (let ...) form) will not work: org-agenda-mode has been called already by the time the custom command is executed, and the global value of org-agenda-start-with-log-mode has been used to set org-agenda-show-log. Any local binding later on has no
effect at all.

So the workaround for this variable is to set org-agenda-show-log in the definition of the custom command. The following works as far as the log
goes:

(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-show-log t) ;;yes
                  (org-agenda-ndays 1)    ;; yes
                  (org-agenda-skip-function  ;; yes
'(org-agenda-skip-entry-if 'notregexp "\\* TODO")))))
        nil nil)))

I presume that a similar problem afflicts the column view variables,
but I have not gone there yet.


The problem with the column variables is similar but not quite the same: column view is set in org-finalize, and org-finalize is called *twice*:

The custom commands are executed by org-run-agenda-series, which first
calls org-agenda-list with the (let ...) settings from the definition of
the custom command and which eventually calls org-finalize with the
proper values of the column view variables. But once org-agenda-list
returns to org-run-agenda-series, the latter continues on and calls
org-finalize again with no (let ...) bindings.  The last call wins and
column view loses.

Thanks,
Nick







reply via email to

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