Re: [Orgmode] Exporting with block agenda

[Carsten Dominik]

Hi Jan,

I just pushed a fix to the git repo, below I include the patch.

Could you please check if this fixed the problem and report back?

Thanks.

- Carsten


diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 7a65b62..5440cca 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -1808,7 +1808,7 @@ so the export commands can easily use it."
   (let ((cmds (org-agenda-normalize-custom-commands org-agenda- 
custom-commands))
        (pop-up-frames nil)
        (dir default-directory)
-       pars cmd thiscmdkey files opts)
+       pars cmd thiscmdkey files opts cmd-or-set)
     (while parameters
       (push (list (pop parameters) (if parameters (pop parameters)))  
pars))
     (setq pars (reverse pars))
@@ -1816,8 +1816,9 @@ so the export commands can easily use it."
       (while cmds
        (setq cmd (pop cmds)
              thiscmdkey (car cmd)
-             opts (nth 4 cmd)
-             files (nth 5 cmd))
+             cmd-or-set (nth 2 cmd)
+             opts (nth (if (listp cmd-or-set) 3 4) cmd)
+             files (nth (if (listp cmd-or-set) 4 5) cmd))
        (if (stringp files) (setq files (list files)))
        (when files
          (eval (list 'let (append org-agenda-exporter-settings opts pars)


On Jul 22, 2008, at 10:49 AM, Jan Seeger wrote:

> Greetings,
>
> I almost went crazy today trying to export my block agenda. I had my
> agenda set up like this:
>
>           (setq org-agenda-custom-commands '(
>                                                                    ("c" ""
>                                                                         ((todo 
> "NEXT|TODO") (agenda))
>                                                                         
> ((org-agenda-with-colors nil)
>                                                                          
> (ps-font-size '(8 . 8))
>                                                                          
> (org-agenda-compact-blocks t)
>                                                                          
> (ps-landscape-mode t)
>                                                                          
> (ps-number-of-columns 2)
>                                                                          )
>                                                                         
> ("/tmp/todo-list.ps")
>                                                                         )
>                   ))
>                 
> , which seemed correct (show todos and an agenda together and export
> it to the /tmp/todo-list.ps file. However, orgmode refused to export
> the agenda. Looking at org-agenda.el, I edebugged
> org-batch-store-agenda-views, and saw that in line 1774, block agendas
> are (seemingly) not parsed correctly. With the syntax from the
> documentation and! customize-variable, file and settings are the third
> and fourth elements respectively.
>
> So I inserted a nil between the commands and the settings, and my
> block agenda miraculously exported.
>
> Is the above setting wrong, or is that a bug in org-mode? (I'm using
> 6.04c with emacs 22.2-r2).
>
> Regards,
> Jan Seeger
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode