From mboxrd@z Thu Jan  1 00:00:00 1970
From: Rainer Stengele <rainer.stengele@online.de>
Subject: Re: Lisp error when starting agenda
Date: Thu, 04 Jul 2013 16:08:57 +0200
Message-ID: <51D581F9.6070600@online.de>
References: <kr3tn2$p1o$1@ger.gmane.org> <877gh6e7vv.fsf@bzg.ath.cx>
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-15
Content-Transfer-Encoding: 7bit
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:51351)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <rainer.stengele@online.de>) id 1UukDT-0007lh-Jf
	for emacs-orgmode@gnu.org; Thu, 04 Jul 2013 10:09:01 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <rainer.stengele@online.de>) id 1UukDS-0005wV-H6
	for emacs-orgmode@gnu.org; Thu, 04 Jul 2013 10:08:59 -0400
In-Reply-To: <877gh6e7vv.fsf@bzg.ath.cx>
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: Bastien <bzg@gnu.org>
Cc: emacs-orgmode@gnu.org

Am 04.07.2013 16:07, schrieb Bastien:
> Hi Rainer,
>
> Rainer Stengele <rainer.stengele@online.de> writes:
>
>> I pulled today and since then run into this issue after starting an
>> agenda:
> Can you give a recipe?
>
> Thanks,
>
    ("01" "agenda - prio A,B todos - sorted prio up - today"  ;;
     (

      ;; show ONGOING todos first, but only if unscheduled, skip if scheduled
      (tags-todo "ONGOING"
             ((org-agenda-skip-function '(org-agenda-skip-entry-if 'scheduled))
              (org-agenda-overriding-header "ONGOING todos: ")))
      (agenda "todays agenda"
          (
           ;; (org-agenda-skip-function
           ;; (lambda nil
           ;;   (org-agenda-skip-entry-if 'regexp ":ONGOING:")))
           ;; (org-agenda-skip-entry-if 'regexp ":ONGOING:")))
           (org-agenda-span 'day)
           (org-agenda-start-with-log-mode t)
           (org-agenda-start-with-clockreport-mode t)

           (org-agenda-overriding-header "Today's Agenda")))

      (alltodo "todos Prio A+B - skip ONGOING todos"
           (
            (org-agenda-skip-function (lambda nil
                        (or (org-agenda-skip-entry-if (quote notregexp) "\\=.*\\[#A\\|#B\\]")
                            (org-agenda-skip-entry-if 'regexp ":ONGOING:")
                            (org-agenda-skip-entry-if 'scheduled 'deadline ))))
            (org-agenda-overriding-header "All todos prio A+B - skip ONGOING todos: ")
            )))
     ((org-agenda-sorting-strategy '(time-up priority-down todo-state-up))))