emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Eric Fraga <e.fraga@ucl.ac.uk>
To: emacs-orgmode@gnu.org
Subject: [bug] org-agenda-diary-entry fails on redisplay of the agenda
Date: Sun, 30 Sep 2012 19:24:35 +0930	[thread overview]
Message-ID: <87ipavbztw.fsf@ucl.ac.uk> (raw)

Hello,

sometime in the past few weeks, something has changed that has led
to problems inserting items in my diary from the agenda view, using
"i d" (org-agenda-diary-entry).  The traceback is

--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument sequencep t)
  mapcar((lambda (tg) (if (or (and hide-re (string-match hide-re tg)) (and (not add-inherited) (get-text-property 0 (quote inherited) tg))) nil tg)) t)
  (delq nil (mapcar (function (lambda (tg) (if (or (and hide-re (string-match hide-re tg)) (and (not add-inherited) (get-text-property 0 ... tg))) nil tg))) tags))
  (setq tags (delq nil (mapcar (function (lambda (tg) (if (or (and hide-re ...) (and ... ...)) nil tg))) tags)))
  (progn (if (string-match "\\([ 	]+\\)\\(:[[:alnum:]_@#%:]+:\\)[ 	]*$" txt) (setq txt (substring txt 0 (match-beginning 0)))) (setq tags (delq nil (mapcar (function (lambda (tg) (if (or ... ...) nil tg))) tags))) (if tags (progn (let ((have-i (get-text-property 0 (quote inherited) (car tags))) i) (setq txt (concat txt " :" (mapconcat (function ...) tags ":") (if have-i "::" ":")))))))
  (if (or add-inherited hide-re) (progn (if (string-match "\\([ 	]+\\)\\(:[[:alnum:]_@#%:]+:\\)[ 	]*$" txt) (setq txt (substring txt 0 (match-beginning 0)))) (setq tags (delq nil (mapcar (function (lambda (tg) (if ... nil tg))) tags))) (if tags (progn (let ((have-i (get-text-property 0 ... ...)) i) (setq txt (concat txt " :" (mapconcat ... tags ":") (if have-i "::" ":"))))))))
  org-agenda-fix-displayed-tags(#("test 3" 0 6 (org-heading t)) t t nil)
  (setq txt (org-agenda-fix-displayed-tags txt tags org-agenda-show-inherited-tags org-agenda-hide-tags-regexp))
  ...
  org-agenda-format-item(nil #("test 3" 0 6 (org-heading t)) nil nil t)
  org-agenda-add-entry-to-org-agenda-diary-file(day #("test 3" 0 6 (org-heading t)) (9 30 2012))
  ...
  org-agenda-diary-entry-in-org-file()
  ...
  org-agenda-diary-entry()
  call-interactively(org-agenda-diary-entry nil nil)
--8<---------------cut here---------------end--------------->8---

I've cut out some of the lines.

I cannot reproduce this with a minimal emacs so there is something in my
configuration that is causing the problem, I guess.  I should note that
I have set org-agenda-diary-file to point to an org file instead of the default
Emacs diary file and that file is based on a date-tree layout.

The actual entry does get inserted in the diary; it is the redisplay of
the agenda that fails.

Inserting into this diary has worked for yonks.

From vc-annotate, I can see that some lines near where the error occurs
were changed in the past month with commit 8365b738.  However, these
don't appear to be anything relevant; not that I can really say this
with any certainty, mind you :(.  Further searching doesn't highlight
anything obvious either.

Any advice or help would be welcome!

Thanks,
eric

-- 
: Eric S Fraga, GnuPG: 0xC89193D8FFFCF67D
: in Emacs 24.2.50.1 and Org release_7.9.1-452-g7d8a0c

             reply	other threads:[~2012-09-30  9:54 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2012-09-30  9:54 Eric Fraga [this message]
2012-09-30  9:58 ` [bug] org-agenda-diary-entry fails on redisplay of the agenda Bastien
2012-09-30 10:41   ` Eric Fraga
2012-09-30 18:21     ` Bastien
2012-10-01  4:36       ` Eric Fraga
2012-10-01  5:08       ` Eric Fraga
2012-10-01  5:27         ` Bastien

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

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87ipavbztw.fsf@ucl.ac.uk \
    --to=e.fraga@ucl.ac.uk \
    --cc=emacs-orgmode@gnu.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 public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).