From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: Bug report Date: Wed, 7 Oct 2009 08:17:02 +0200 Message-ID: References: <4711_1254820364_4ACB0A0C_4711_253048_1_81fe3f00910060212g2fb9a702g6807cecfeed96548@mail.gmail.com> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=ISO-8859-1; format=flowed; delsp=yes Content-Transfer-Encoding: quoted-printable Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MvPpo-0006lW-IG for emacs-orgmode@gnu.org; Wed, 07 Oct 2009 02:17:12 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MvPpj-0006iw-FI for emacs-orgmode@gnu.org; Wed, 07 Oct 2009 02:17:12 -0400 Received: from [199.232.76.173] (port=51220 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MvPpi-0006io-JT for emacs-orgmode@gnu.org; Wed, 07 Oct 2009 02:17:07 -0400 Received: from mail-ew0-f223.google.com ([209.85.219.223]:35777) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1MvPph-0002vK-TF for emacs-orgmode@gnu.org; Wed, 07 Oct 2009 02:17:06 -0400 Received: by ewy23 with SMTP id 23so5025868ewy.2 for ; Tue, 06 Oct 2009 23:17:05 -0700 (PDT) In-Reply-To: <4711_1254820364_4ACB0A0C_4711_253048_1_81fe3f00910060212g2fb9a702g6807cecfeed96548@mail.gmail.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Otto Pichlhoefer Cc: emacs-orgmode@gnu.org Hi Otto, my guess is that you have set the variable org-agenda-start-on-weekday to t, which is not a valid value. Set it to the number 1 if you want to start on Monday. HTH - Carsten On Oct 6, 2009, at 11:12 AM, Otto Pichlhoefer wrote: > Hello, > > I ran in to the following problem. > > GNU Emacs 23.1.1 (i386-mingw-nt5.1.2600) of 2009-07-30 on SOFT-MJASON > Computing completion candidates... > Org-mode version 6.28e > > On pressing (Agenda for ...) in the *Agenda Commands* buffer =20 > Emacs throws up the following error: > > Debugger entered--Lisp error: (wrong-type-argument number-or-marker-=20= > p t) > -(2 t) > (let* ((nt ...) (n1 org-agenda-start-on-weekday) (d ...)) (- sd =20 > (+ ... d))) > (if (or (null org-agenda-start-on-weekday) (< org-agenda-ndays 7)) =20= > sd (let* (... ... ...) (- sd ...))) > (let* ((org-agenda-start-on-weekday ...) (thefiles ...) (files =20 > thefiles) (today ...) (sd ...) (start ...) (day-numbers ...) (day-=20 > cnt 0) (inhibit-redisplay ...) s e rtn rtnall file date d start-pos =20= > end-pos todayp nd wd clocktable-start clocktable-end) (setq org-=20 > agenda-redo-command (list ... ... start-day ndays)) (setq ndays (or =20= > ndays org-agenda-ndays) nd ndays) (while (> ndays 1) (push ... day-=20 > numbers) (setq ndays ...)) (setq day-numbers (nreverse day-numbers)) =20= > (setq clocktable-start (car day-numbers) clocktable-end (1+ ...)) =20 > (org-prepare-agenda "Day/Week") (org-set-local (quote org-starting-=20 > day) (car day-numbers)) (org-set-local (quote org-include-all-loc) =20 > include-all) (org-set-local (quote org-agenda-span) (org-agenda-=20 > ndays-to-span nd)) (when (and ... ...) (setq files thefiles rtnall =20 > nil) (while ... ...) (when rtnall ... ... ...)) (unless org-agenda-=20 > compact-blocks (let* ... ... ...) (add-text-properties s ... ...)) =20 > (while (setq d ...) (setq date ... wd ... s ...) (if ... ... ...) =20 > (setq files thefiles rtnall nil) (while ... ...) (if org-agenda-=20 > include-diary ...) (if ... ...)) (when (and org-agenda-clockreport-=20 > mode clocktable-start) (let ... ... ... ... ... ... ...)) (goto-char =20= > (point-min)) (or org-agenda-multi (org-fit-agenda-window)) (unless =20 > (and ... ...) (goto-char ...) (recenter -1) (if ... ...)) (goto-char =20= > (or start-pos 1)) (add-text-properties (point-min) (point-max) =20 > (quote ...)) (org-finalize-agenda) (setq buffer-read-only t) =20 > (message "")) > org-agenda-list(nil) > call-interactively(org-agenda-list) > (cond ((setq entry ...) (if ... ... ...)) ((equal keys "C") (setq =20= > org-agenda-custom-commands org-agenda-custom-commands-orig) =20 > (customize-variable ...)) ((equal keys "a") (call-=20 > interactively ...)) ((equal keys "s") (call-interactively ...)) =20 > ((equal keys "t") (call-interactively ...)) ((equal keys "T") (org-=20 > call-with-arg ... ...)) ((equal keys "m") (call-interactively ...)) =20= > ((equal keys "M") (org-call-with-arg ... ...)) ((equal keys "e") =20 > (call-interactively ...)) ((equal keys "L") (unless ... ...) (unless =20= > restriction ... ...)) ((equal keys "#") (call-interactively ...)) =20 > ((equal keys "/") (call-interactively ...)) ((equal keys "!") =20 > (customize-variable ...)) (t (error "Invalid agenda key"))) > (let* ((prefix-descriptions nil) (org-agenda-custom-commands-orig =20= > org-agenda-custom-commands) (org-agenda-custom-commands ...) =20 > (buf ...) (bfn ...) entry key type match lprops ans) (unless org-=20 > agenda-overriding-restriction (put ... ... nil) (setq org-agenda-=20 > restrict nil) (move-marker org-agenda-restrict-begin nil) (move-=20 > marker org-agenda-restrict-end nil)) (put (quote org-agenda-redo-=20 > command) (quote org-lprops) nil) (setq org-agenda-last-dispatch-=20 > buffer (current-buffer)) (unless keys (setq ans ... keys ... =20 > restriction ...)) (when (and ... restriction) (put ... ... ...) =20 > (cond ... ...)) (require (quote calendar)) (cond (... ...) =20 > (... ... ...) (... ...) (... ...) (... ...) (... ...) (... ...) =20 > (... ...) (... ...) (... ... ...) (... ...) (... ...) (... ...) =20 > (t ...))) > (catch (quote exit) (let* (... ... ... ... ... entry key type =20 > match lprops ans) (unless org-agenda-overriding-=20 > restriction ... ... ... ...) (put ... ... nil) (setq org-agenda-last-=20= > dispatch-buffer ...) (unless keys ...) (when ... ... ...) =20 > (require ...) =20 > (cond ... ... ... ... ... ... ... ... ... ... ... ... ... ...))) > org-agenda(nil) > call-interactively(org-agenda nil nil) > > Please confirm that this is a bug and advice on what to do... > > Regards, > > > > Otto Pichlhoefer, MD > Medical University of Vienna, Center for Public Health > Department of General Practice and Family Medicine > W=E4hringer Stra=DFe 13a > A-1090 Wien, Austria > Tel. +43 (1) 4277-65960 > Fax. +43 (1) 25 33033 4532 > Mobil +43 (664) 80016-34611 > Email: otto.pichlhoefer@meduniwien.ac.at > _______________________________________________ > Emacs-orgmode mailing list > Remember: use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode