From mboxrd@z Thu Jan 1 00:00:00 1970 From: Bernt Hansen Subject: Re: Bug: i in agenda complains mark is not active now [6.33trans (release_6.33c.26.ga839)] Date: Fri, 20 Nov 2009 07:14:59 -0500 Message-ID: <87lji1qtoc.fsf@gollum.intra.norang.ca> References: <200911191626.nAJGQaTT022814@gollum.intra.norang.ca> <1017F01F-6BCA-45A4-8AEA-3676668374C4@gmail.com> <87pr7dqtud.fsf@gollum.intra.norang.ca> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NBSOR-0005er-7A for emacs-orgmode@gnu.org; Fri, 20 Nov 2009 07:15:15 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1NBSOM-0005bu-Qw for emacs-orgmode@gnu.org; Fri, 20 Nov 2009 07:15:14 -0500 Received: from [199.232.76.173] (port=33065 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NBSOM-0005bi-Jb for emacs-orgmode@gnu.org; Fri, 20 Nov 2009 07:15:10 -0500 Received: from mho-02-ewr.mailhop.org ([204.13.248.72]:54586) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1NBSOK-0008L1-W8 for emacs-orgmode@gnu.org; Fri, 20 Nov 2009 07:15:10 -0500 In-Reply-To: <87pr7dqtud.fsf@gollum.intra.norang.ca> (Bernt Hansen's message of "Fri\, 20 Nov 2009 07\:11\:22 -0500") 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: Carsten Dominik Cc: emacs-orgmode@gnu.org If you hit i on the first line of the agenda you get Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil) calendar-gregorian-from-absolute(nil) (setq d1 (calendar-gregorian-from-absolute (get-text-property ... ...)) d= 2 (and (ignore-errors ...) (save-excursion ... ...) (calendar-gregorian-fro= m-absolute dp))) (if (equal (buffer-name) "*Calendar*") (setq d1 (calendar-cursor-to-date = t) d2 (car calendar-mark-ring)) (setq d1 (calendar-gregorian-from-absolute = ...) d2 (and ... ... ...))) (let (d1 d2 char (text "") dp) (if (equal ... "*Calendar*") (setq d1 ... = d2 ...) (setq d1 ... d2 ...)) (message "Diary entry: [d]ay [a]nniversary [b= ]lock [j]ump to date tree") (setq char (read-char-exclusive)) (cond (... ..= . ...) (... ... ... ...) (... ... ... ...) (... ... ... ...) (t ...))) org-agenda-diary-entry-in-org-file() (if (not (eq org-agenda-diary-file ...)) (org-agenda-diary-entry-in-org-f= ile) (require (quote diary-lib)) (let* (... ... ... ... ...) (unless cmd ..= .) (unless ... ...) (let ... ...))) org-agenda-diary-entry() call-interactively(org-agenda-diary-entry) recursive-edit() byte-code("=C3=86=10 @=C3=87=3D=C2=83!=00=C3=88=C3=89=C3=8A\"=C2=88=C3=8B= =C3=89!=C2=89=1AA@)=C2=A2=C3=8C=3D=C2=83!=00=C3=88=C3=8D=C3=8A\"=C2=88=C3= =8E=0B!=C2=88=C3=8F =C2=88=C3=90 !=C2=88\f=C2=83c=00=C3=91ed\"=0DV=C2=83W= =00eb=C2=88=C3=92=0D=C2=A5y=C2=88`=1E=1Bdb=C2=88=C3=92=0D=C2=A5=0DZy=C2=88= =0E=1B`|=C2=88)=C3=93c=C2=88eb=C2=88=C3=94=C3=95=C3=96 \"=C2=88=C3=97 =C2= =88=C3=94=C3=98!=C2=88=C3=99=C3=8A=1E=1C=1E=1D=C3=94=C3=98!=C2=88=C2=8A=C3= =9A =C2=88+=C3=99=C2=87" [unread-command-char debugger-args x debugger-buff= er noninteractive debugger-batch-max-lines -1 debug backtrace-debug 4 t bac= ktrace-frame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer cou= nt-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-e= dit middlestart buffer-read-only standard-output] 4) debug(error (mark-inactive)) signal(mark-inactive nil) mark() (and (mark) (get-text-property (mark) (quote day)) (calendar-gregorian-fr= om-absolute (get-text-property ... ...))) (setq d1 (calendar-gregorian-from-absolute (get-text-property ... ...)) d= 2 (and (mark) (get-text-property ... ...) (calendar-gregorian-from-absolute= ...))) (if (equal (buffer-name) "*Calendar*") (setq d1 (calendar-cursor-to-date = t) d2 (car calendar-mark-ring)) (setq d1 (calendar-gregorian-from-absolute = ...) d2 (and ... ... ...))) (let (d1 d2 char (text "")) (if (equal ... "*Calendar*") (setq d1 ... d2 = ...) (setq d1 ... d2 ...)) (message "Diary entry: [d]ay [a]nniversary [b]lo= ck [j]ump to date tree") (setq char (read-char-exclusive)) (cond (... ... .= ..) (... ... ... ...) (... ... ... ...) (... ... ... ...) (t ...))) org-agenda-diary-entry-in-org-file() (if (not (eq org-agenda-diary-file ...)) (org-agenda-diary-entry-in-org-f= ile) (require (quote diary-lib)) (let* (... ... ... ... ...) (unless cmd ..= .) (unless ... ...) (let ... ...))) org-agenda-diary-entry() call-interactively(org-agenda-diary-entry) and if you hit i on the last line of the agenda you get Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil) calendar-gregorian-from-absolute(nil) (setq d1 (calendar-gregorian-from-absolute (get-text-property ... ...)) d= 2 (and (ignore-errors ...) (save-excursion ... ...) (calendar-gregorian-fro= m-absolute dp))) (if (equal (buffer-name) "*Calendar*") (setq d1 (calendar-cursor-to-date = t) d2 (car calendar-mark-ring)) (setq d1 (calendar-gregorian-from-absolute = ...) d2 (and ... ... ...))) (let (d1 d2 char (text "") dp) (if (equal ... "*Calendar*") (setq d1 ... = d2 ...) (setq d1 ... d2 ...)) (message "Diary entry: [d]ay [a]nniversary [b= ]lock [j]ump to date tree") (setq char (read-char-exclusive)) (cond (... ..= . ...) (... ... ... ...) (... ... ... ...) (... ... ... ...) (t ...))) org-agenda-diary-entry-in-org-file() (if (not (eq org-agenda-diary-file ...)) (org-agenda-diary-entry-in-org-f= ile) (require (quote diary-lib)) (let* (... ... ... ... ...) (unless cmd ..= .) (unless ... ...) (let ... ...))) org-agenda-diary-entry() call-interactively(org-agenda-diary-entry) -Bernt Bernt Hansen writes: > Carsten Dominik writes: > >> I cannot reproduce this. Can you please send a backtrace? >> >> - Carsten > > I can't reproduce it with the tip of master today either so I think > it's fixed. It's broken on the commit I was on yesterday which is > > 1bb0df0 (Allow diary entry insertion at top-level, 2009-11-19) > > Debugger entered--Lisp error: (mark-inactive) > signal(mark-inactive nil) > mark() > (and (mark) (get-text-property (mark) (quote day)) (calendar-gregorian-= from-absolute (get-text-property ... ...))) > (setq d1 (calendar-gregorian-from-absolute (get-text-property ... ...))= d2 (and (mark) (get-text-property ... ...) (calendar-gregorian-from-absolu= te ...))) > (if (equal (buffer-name) "*Calendar*") (setq d1 (calendar-cursor-to-dat= e t) d2 (car calendar-mark-ring)) (setq d1 (calendar-gregorian-from-absolut= e ...) d2 (and ... ... ...))) > (let (d1 d2 char (text "")) (if (equal ... "*Calendar*") (setq d1 ... d= 2 ...) (setq d1 ... d2 ...)) (message "Diary entry: [d]ay [a]nniversary [b]= lock [j]ump to date tree") (setq char (read-char-exclusive)) (cond (... ...= ...) (... ... ... ...) (... ... ... ...) (... ... ... ...) (t ...))) > org-agenda-diary-entry-in-org-file() > (if (not (eq org-agenda-diary-file ...)) (org-agenda-diary-entry-in-org= -file) (require (quote diary-lib)) (let* (... ... ... ... ...) (unless cmd = ...) (unless ... ...) (let ... ...))) > org-agenda-diary-entry() > call-interactively(org-agenda-diary-entry) > > -Bernt > >> >> On Nov 19, 2009, at 5:26 PM, Bernt Hansen wrote: >> >>> >>> Remember to cover the basics, that is, what you expected to happen and >>> what in fact did happen. You don't know how to make a good report? >>> See >>> >>> http://orgmode.org/manual/Feedback.html#Feedback >>> >>> Your bug report will be posted to the Org-mode mailing list. >>> ------------------------------------------------------------------------ >>> When org-agenda-diary-file is set to a special org file for diary >>> entries and transient mark mode is enabled 'i' in the agenda fails >>> with 'mark is not active now' >>> >>> My workaround for this is C-SPC to set the mark anywhere legal in the >>> agenda display (ie not on the first or last line) and then hit 'i' >>> to insert my diary entries. >>> >>> -Bernt >>> >>> Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11) >>> of 2008-11-09 on raven, modified by Debian >>> Package: Org-mode version 6.33trans (release_6.33c.26.ga839) >>> >>> >>> _______________________________________________ >>> 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 >> >> - Carsten