From: Samuel Wales <samologist@gmail.com>
To: Matt Lundin <mdl@imapmail.org>
Cc: emacs org-mode mailing list <emacs-orgmode@gnu.org>
Subject: Re: Update breaks custom agenda commands
Date: Mon, 17 Aug 2009 19:34:28 -0700 [thread overview]
Message-ID: <20524da70908171934o39671e72s1f1948fe4c828715@mail.gmail.com> (raw)
In-Reply-To: <87ws53objd.fsf@fastmail.fm>
Occurs here. It seems related to setting variables in clauses.
What is the best way to revert the commit?
git revert in a local branch?
Thanks.
On 2009-08-16, Matt Lundin <mdl@imapmail.org> wrote:
> Hi Carsten,
>
> The following commit causes an error when I call org-agenda:
>
> ,----
> | commit 8c177dc832980bd8cf23fc2ae72b18e0b472b59e
> | Author: Carsten Dominik <carsten.dominik@gmail.com>
> | Date: Fri Aug 14 17:18:14 2009 +0200
> |
> | Avoid text properties on elements in custom variables
> `----
>
> The problem does not occur when I set org-agenda-custom-commands to nil.
>
> Here are my custom command settings:
>
> --8<---------------cut here---------------start------------->8---
> (setq org-agenda-custom-commands
> '(("p" "Printed agenda"
> ((agenda ""
> ((org-agenda-ndays 7)
> (org-agenda-start-on-weekday nil)
> (org-agenda-time-grid nil)
> (org-agenda-repeating-timestamp-show-all t)
> (org-agenda-prefix-format " --> %t %s")
> (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline
> 'scheduled))))
> (agenda ""
> ((org-agenda-ndays 1)
> (org-agenda-sorting-strategy '(time-up tag-up))
> (org-agenda-todo-keyword-format "[ ]")
> (org-agenda-scheduled-leaders '("" ""))
> (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline))
> (org-agenda-prefix-format "%t %T %s")
> ))
> (agenda ""
> ((org-agenda-ndays 1)
> (org-deadline-warning-days 7)
> (org-agenda-time-grid nil)
> (org-agenda-include-diary nil)
> (org-agenda-todo-keyword-format "[ ]")
> (org-agenda-scheduled-leaders '("" ""))
> (org-agenda-overriding-header "Deadlines:")
> (org-agenda-skip-function '(org-agenda-skip-entry-if 'notdeadline))
> (org-agenda-prefix-format "%t %s")))
> (todo "TODO|STARTED|NOW"
> ((org-agenda-sorting-strategy '(tag-up priority-down))
> (org-agenda-todo-ignore-with-date t)))
> (todo "WAITING"))
> ((org-agenda-with-colors nil)
> (org-agenda-prefix-format "%T [ ]")
> (org-agenda-todo-keyword-format "")
> (org-agenda-include-all-todo nil)
> (org-agenda-block-separator "---------------\n")
> (org-agenda-remove-tags t)
> (ps-number-of-columns 2)
> (ps-print-header nil)
> (ps-landscape-mode t))
> ("~/storage/agenda/agenda.pdf"))
> ("q" . "Searches")
> ("qa" "Archive files" search ""
> ((org-agenda-files (file-expand-wildcards "~/mystuff/org/.*.archive"))))
> ("qn" "Notes files" search ""
> ((org-agenda-files (file-expand-wildcards "~/mystuff/org/*.notes"))))
> ("qw" "Website search" search ""
> ((org-agenda-files (file-expand-wildcards "~/mystuff/website/*.org"))))
> ("n" "Now"
> ((todo "NOW|STARTED")
> ((org-agenda-todo-ignore-with-date nil))))
> ("h" "Habits"
> ((agenda ""))
> ((org-agenda-show-log t)
> (org-agenda-include-diary nil)
> (org-agenda-include-all-todo nil)
> (org-agenda-ndays 1)
> (org-agenda-start-on-weekday nil)
> (org-agenda-log-mode-items '(state))
> (org-agenda-time-grid nil)
> (org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp
> ":DAILY:"))))
> ;; Today - daily tasks view
> ("d" "Today"
> ((agenda "" ((org-agenda-ndays 1)
> (org-agenda-include-all-todo nil)
> ))
> (alltodo "" ((org-agenda-sorting-strategy '(todo-state-up))
> (org-agenda-todo-ignore-with-date t)))))
> ("y" "Projects"
> ((agenda "" ((org-agenda-skip-function '(org-agenda-skip-entry-if
> 'notregexp "* PROJECT")))
> ((org-agenda-include-diary nil)
> (org-agenda-include-all-todo nil)
> (org-agenda-time-grid nil)))
> (todo "PROJECT" ((org-agenda-todo-ignore-deadlines-t)
> (org-agenda-sorting-strategy '(priority-down))))))
> ("R" "Review"
> ((stuck "")
> (agenda ""
> ((org-agenda-skip-function '(org-agenda-skip-entry-if 'notdeadline))))
> (agenda ""
> ((org-agenda-ndays 1)
> (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline))))
> (todo "PROJECT" ((org-agenda-sorting-strategy '(todo-state-down
> priority-down))))
> (todo "NOW|STARTED|TODO" ((org-agenda-sorting-strategy '(todo-state-down
> priority-down))))
> (todo "WAITING")
> (todo "MAYBE"))
> ((org-agenda-todo-ignore-with-date t)
> (org-agenda-todo-ignore-deadlines t)
> (org-agenda-time-grid nil)
> (org-agenda-include-all-todo nil)
> (org-deadline-warning-days 360)))
> ("c" "Schedule" agenda ""
> ((org-agenda-ndays 7)
> (org-agenda-start-on-weekday 1)
> (org-agenda-time-grid nil)
> (org-agenda-prefix-format " %12:t ")
> (org-agenda-include-all-todo nil)
> (org-agenda-repeating-timestamp-show-all t)
> (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline
> 'scheduled))))
> ("u" "Upcoming deadlines (6 months)" agenda ""
> ((org-agenda-skip-function '(org-agenda-skip-entry-if 'notdeadline))
> (org-agenda-ndays 1)
> (org-agenda-include-all-todo nil)
> (org-deadline-warning-days 180)
> (org-agenda-time-grid nil)))
> ))
> --8<---------------cut here---------------end--------------->8---
>
> And attached is the backtrace.
>
>
--
Myalgic encephalomyelitis causes death (Jason et al. 2006)
and severe suffering. Conflicts of interest are destroying
research. What people "know" is wrong. Silence = death.
http://www.meactionuk.org.uk/What_Is_ME_What_Is_CFS.htm
next prev parent reply other threads:[~2009-08-18 2:34 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2009-08-16 18:31 Update breaks custom agenda commands Matt Lundin
2009-08-18 2:34 ` Samuel Wales [this message]
2009-08-18 5:32 ` Carsten Dominik
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20524da70908171934o39671e72s1f1948fe4c828715@mail.gmail.com \
--to=samologist@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=mdl@imapmail.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.