Le lundi 16 août 2010 à 22:18 +0200, Bastien a écrit : > I quickly checked the structure -- the `org-agenda-filter-preset > variable should be inside another pair of parentheses. > > ,---- > | (setq org-agenda-custom-commands > | (quote (("t" "TEST" > | ((agenda "" > | ((org-agenda-skip-function > | (lambda () > | (let* ((ts (org-entry-get nil "TIMESTAMP"))) > | (if (or (not ts) (equal ts "")) > | (progn (outline-next-heading) (point)))))))) > | (tags-todo "classe") > | (tags-todo "labo") > | (tags-todo "@lycée-classe-labo") > | ) > | ((org-agenda-filter-preset quote ("+lycée"))) > | )))) > `---- > > (Not tested.)
It works thanks, I also add to replace "quote" by a "'". The final working version is then : ,---- | | (setq org-agenda-custom-commands | (quote (("t" "TEST" | ((agenda "" | ((org-agenda-skip-function | (lambda () | (let* ((ts (org-entry-get nil "TIMESTAMP"))) | (if (or (not ts) (equal ts "")) | (progn (outline-next-heading) (point)))))))) | (tags-todo "classe") | (tags-todo "labo") | (tags-todo "@lycée-classe-labo") | ) | ((org-agenda-filter-preset '("+lycée"))) | )))) `---- _______________________________________________ Emacs-orgmode mailing list Please use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode