From mboxrd@z Thu Jan 1 00:00:00 1970 From: Erik Iverson Subject: Re: Help: Agenda not working anymore Date: Mon, 12 Jul 2010 12:13:00 -0500 Message-ID: <4C3B4D1C.9050708@ccbr.umn.edu> References: Mime-Version: 1.0 Content-Type: text/plain; charset=windows-1252; format=flowed Content-Transfer-Encoding: quoted-printable Return-path: Received: from [140.186.70.92] (port=33582 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OYMZ0-0004ks-IL for emacs-orgmode@gnu.org; Mon, 12 Jul 2010 13:13:08 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OYMYy-0002DS-VV for emacs-orgmode@gnu.org; Mon, 12 Jul 2010 13:13:06 -0400 Received: from walleye.ccbr.umn.edu ([128.101.116.11]:4907) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OYMYy-0002DN-Kt for emacs-orgmode@gnu.org; Mon, 12 Jul 2010 13:13:04 -0400 In-Reply-To: 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: Markus Heller Cc: emacs-orgmode@gnu.org Could be related: I just pulled latest from git this morning: my agenda seems to compile,=20 but I get in the *Messages* buffer: concat: Wrong type argument: listp, "* Letters" Backtrace follows: Debugger entered--Lisp error: (wrong-type-argument listp "* Letters") nth(0 "* Letters") (concat "(?\\(" (regexp-quote "\\") (nth 0 el) "[^[:alnum:]]" "\\)") (list (concat "(?\\(" (regexp-quote "\\") (nth 0 el) "[^[:alnum:]]"=20 "\\)") (\` (0 ...))) (lambda (el) (list (concat "(?\\(" ... ... "[^[:alnum:]]" "\\)") (\`=20 ...)))("* Letters") mapcar((lambda (el) (list (concat "(?\\(" ... ... "[^[:alnum:]]"=20 "\\)") (\` ...))) ("* Letters" "** Latin" ("Agrave" "\\`{A}" nil=20 "À" "A" "=C0" "=C0") ("agrave" "\\`{a}" nil "à" "a" "=E0" "= =E0")=20 ("Aacute" "\\'{A}" nil "Á" "A" "=C1" "=C1") ("aacute" "\\'{a}" nil= =20 "á" "a" "=E1" "=E1") ("Acirc" "\\^{A}" nil "Â" "A" "=C2" "=C2= ")=20 ("acirc" "\\^{a}" nil "â" "a" "=E2" "=E2") ("Atilde" "\\~{A}" nil=20 "Ã" "A" "=C3" "=C3") ("atilde" "\\~{a}" nil "ã" "a" "=E3" "= =E3")=20 ("Auml" "\\\"{A}" nil "Ä" "Ae" "=C4" "=C4") ("auml" "\\\"{a}" nil=20 "ä" "ae" "=E4" "=E4") ("Aring" "\\AA{}" nil "Å" "A" "=C5" "=C5= ")=20 ("AA" "\\AA{}" nil "Å" "A" "=C5" "=C5") ("aring" "\\aa{}" nil=20 "å" "a" "=E5" "=E5") ("AElig" "\\AE{}" nil "Æ" "AE" "=C6" "=C6= ")=20 ("aelig" "\\ae{}" nil "æ" "ae" "=E6" "=E6") ("Ccedil" "\\c{C}" nil=20 "Ç" "C" "=C7" "=C7") ("ccedil" "\\c{c}" nil "ç" "c" "=E7" "= =E7")=20 ("Egrave" "\\`{E}" nil "È" "E" "=C8" "=C8") ("egrave" "\\`{e}" nil= =20 "è" "e" "=E8" "=E8") ("Eacute" "\\'{E}" nil "É" "E" "=C9" "= =C9")=20 ("eacute" "\\'{e}" nil "é" "e" "=E9" "=E9") ("Ecirc" "\\^{E}" nil=20 "Ê" "E" "=CA" "=CA") ("ecirc" "\\^{e}" nil "ê" "e" "=EA" "=EA= ")=20 ("Euml" "\\\"{E}" nil "Ë" "E" "=CB" "=CB") ("euml" "\\\"{e}" nil=20 "ë" "e" "=EB" "=EB") ("Igrave" "\\`{I}" nil "Ì" "I" "=CC" "=CC= ")=20 ("igrave" "\\`{i}" nil "ì" "i" "=EC" "=EC") ("Iacute" "\\'{I}" nil= =20 "Í" "I" "=CD" "=CD") ("iacute" "\\'{i}" nil "í" "i" "=ED" "= =ED")=20 ("Icirc" "\\^{I}" nil "Î" "I" "=CE" "=CE") ("icirc" "\\^{i}" nil=20 "î" "i" "=EE" "=EE") ("Iuml" "\\\"{I}" nil "Ï" "I" "=CF" "=CF"= )=20 ("iuml" "\\\"{i}" nil "ï" "i" "=EF" "=EF") ("Ntilde" "\\~{N}" nil=20 "Ñ" "N" "=D1" "=D1") ("ntilde" "\\~{n}" nil "ñ" "n" "=F1" "= =F1")=20 ("Ograve" "\\`{O}" nil "Ò" "O" "=D2" "=D2") ("ograve" "\\`{o}" nil= =20 "ò" "o" "=F2" "=F2") ("Oacute" "\\'{O}" nil "Ó" "O" "=D3" "= =D3")=20 ("oacute" "\\'{o}" nil "ó" "o" "=F3" "=F3") ("Ocirc" "\\^{O}" nil=20 "Ô" "O" "=D4" "=D4") ("ocirc" "\\^{o}" nil "ô" "o" "=F4" "=F4= ")=20 ("Otilde" "\\~{O}" nil "Õ" "O" "=D5" "=D5") ("otilde" "\\~{o}" nil= =20 "õ" "o" "=F5" "=F5") ("Ouml" "\\\"{O}" nil "Ö" "Oe" "=D6" "=D6= ")=20 ("ouml" "\\\"{o}" nil "ö" "oe" "=F6" "=F6") ("Oslash" "\\O" nil=20 "Ø" "O" "=D8" "=D8") ("oslash" "\\o{}" nil "ø" "o" "=F8" "=F8= ")=20 ("OElig" "\\OE{}" nil "Œ" "OE" "OE" "=8C") ...)) (font-lock-add-keywords nil (mapcar (lambda ... ...) org-entities)) org-pretty-entities() run-hooks(text-mode-hook outline-mode-hook org-mode-hook) apply(run-hooks (text-mode-hook outline-mode-hook org-mode-hook)) run-mode-hooks(org-mode-hook) org-mode() (progn (org-mode) (org-create-dblock props) (org-update-dblock)=20 (font-lock-fontify-buffer) (forward-line 2) (buffer-substring (point)=20 (progn ... ...))) (unwind-protect (progn (org-mode) (org-create-dblock props)=20 (org-update-dblock) (font-lock-fontify-buffer) (forward-line 2)=20 (buffer-substring ... ...)) (and (buffer-name temp-buffer) (kill-buffer=20 temp-buffer))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn=20 ... ... ... ... ... ...) (and ... ...))) (with-current-buffer temp-buffer (unwind-protect (progn ... ... ...=20 ... ... ...) (and ... ...))) (let ((temp-buffer ...)) (with-current-buffer temp-buffer=20 (unwind-protect ... ...))) (with-temp-buffer (org-mode) (org-create-dblock props)=20 (org-update-dblock) (font-lock-fontify-buffer) (forward-line 2)=20 (buffer-substring (point) (progn ... ...))) org-get-clocktable(:link t :maxlevel 2 :tstart 733965 :tend 733972=20 :scope agenda) apply(org-get-clocktable (:link t :maxlevel 2 :tstart 733965 :tend=20 733972 :scope agenda)) (setq tbl (apply (quote org-get-clocktable) p)) (let ((org-agenda-files ...) (p=20 org-agenda-clockreport-parameter-plist) tbl) (setq p (org-plist-delete p=20 :block)) (setq p (plist-put p :tstart clocktable-start)) (setq p=20 (plist-put p :tend clocktable-end)) (setq p (plist-put p :scope ...))=20 (setq tbl (apply ... p)) (insert tbl)) (progn (let (... ... tbl) (setq p ...) (setq p ...) (setq p ...)=20 (setq p ...) (setq tbl ...) (insert tbl))) (if (and org-agenda-clockreport-mode clocktable-start) (progn (let=20 ... ... ... ... ... ... ...))) (when (and org-agenda-clockreport-mode clocktable-start) (let (...=20 ... tbl) (setq p ...) (setq p ...) (setq p ...) (setq p ...) (setq tbl=20 ...) (insert tbl))) (let* ((org-agenda-start-on-weekday ...) (thefiles ...) (files=20 thefiles) (today ...) (sd ...) (start ...) (day-numbers ...) (day-cnt 0)=20 (inhibit-redisplay ...) s e rtn rtnall file date d start-pos end-pos=20 todayp nd wd clocktable-start clocktable-end) (setq=20 org-agenda-redo-command (list ... ... start-day ndays)) (setq ndays (or=20 ndays org-agenda-ndays) nd ndays) (while (> ndays 1) (push ...=20 day-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-day)=20 (car day-numbers)) (org-set-local (quote org-include-all-loc)=20 include-all) (org-set-local (quote org-agenda-span)=20 (org-agenda-ndays-to-span nd)) (when (and ... ...) (setq files thefiles=20 rtnall nil) (while ... ...) (when rtnall ... ... ... ...)) (unless=20 org-agenda-compact-blocks (let* ... ... ...) (add-text-properties s ...=20 ...) (org-agenda-mark-header-line s)) (while (setq d ...) (setq date ...=20 wd ... s ...) (if ... ... ...) (setq files thefiles rtnall nil) (while=20 ... ...) (if org-agenda-include-diary ...) (if ... ...)) (when (and=20 org-agenda-clockreport-mode clocktable-start) (let ... ... ... ... ...=20 ... ...)) (goto-char (point-min)) (or org-agenda-multi=20 (org-fit-agenda-window)) (unless (and ... ...) (goto-char ...) (recenter=20 -1) (if ... ...)) (goto-char (or start-pos 1)) (add-text-properties=20 (point-min) (point-max) (quote ...)) (org-finalize-agenda) (setq=20 buffer-read-only t) (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-interactively ...))=20 ((equal keys "s") (call-interactively ...)) ((equal keys "t")=20 (call-interactively ...)) ((equal keys "T") (org-call-with-arg ... ...))=20 ((equal keys "m") (call-interactively ...)) ((equal keys "M")=20 (org-call-with-arg ... ...)) ((equal keys "e") (call-interactively ...))=20 ((equal keys "?") (org-tags-view nil "+FLAGGED") (org-add-hook ... ... t=20 t)) ((equal keys "L") (unless ... ...) (unless restriction ... ...))=20 ((equal keys "#") (call-interactively ...)) ((equal keys "/")=20 (call-interactively ...)) ((equal keys "!") (customize-variable ...)) (t=20 (error "Invalid agenda key"))) (let* ((prefix-descriptions nil) (org-agenda-window-setup ...)=20 (org-agenda-custom-commands-orig org-agenda-custom-commands)=20 (org-agenda-custom-commands ...) (buf ...) (bfn ...) entry key type=20 match lprops ans) (unless org-agenda-overriding-restriction (unless ...=20 ...) (setq org-agenda-restrict nil) (move-marker=20 org-agenda-restrict-begin nil) (move-marker org-agenda-restrict-end=20 nil)) (put (quote org-agenda-redo-command) (quote org-lprops) nil) (setq=20 org-agenda-last-dispatch-buffer (current-buffer)) (unless keys (setq ans=20 ... keys ... restriction ...)) (when (and ... restriction) (put ... ...=20 ...) (cond ... ...)) (cond (... ...) (... ... ...) (... ...) (... ...)=20 (... ...) (... ...) (... ...) (... ...) (... ...) (... ... ...) (... ...=20 ...) (... ...) (... ...) (... ...) (t ...))) (catch (quote exit) (let* (... ... ... ... ... ... entry key type=20 match lprops ans) (unless org-agenda-overriding-restriction ... ... ...=20 ...) (put ... ... nil) (setq org-agenda-last-dispatch-buffer ...)=20 (unless keys ...) (when ... ... ...) (cond ... ... ... ... ... ... ...=20 ... ... ... ... ... ... ... ...))) org-agenda(nil) call-interactively(org-agenda nil nil) Markus Heller wrote: > Hello, >=20 > today, after starting emacs, the agenda does not work anymore. I type=20 > C-a a to get the daily overview, but org gets stuck at CONTENTS...done=20 > (see message buffer at the end). >=20 > When I try f9-m (see Bernt's set-up), I get the following message in th= e=20 > mini-buffer: mapcar: Wrong type argument: listp, \.\.\. >=20 > I pulled the latest release, but that didn't help unfortunately. >=20 > My versions: >=20 > Org-mode: Org-mode version 6.36trans (release_6.36.608.gc1ef) > emacs: 23.2.1 > Windoze XP >=20 > Please help :) >=20 > Thanks!! > Markus >=20 > *Messages* after C-a a: > Loading c:/Documents and=20 > Settings/mheller/.emacs.d/org-mode/contrib/lisp/org-checklist.el=20 > (source)...done > Loading c:/Documents and=20 > Settings/mheller/.emacs.d/org-mode/contrib/lisp/org-depend.el=20 > (source)...done > Loading c:/Documents and=20 > Settings/mheller/.emacs.d/org-mode/contrib/lisp/org-expiry.el=20 > (source)...done > Loading c:/Documents and=20 > Settings/mheller/.emacs.d/site-lisp/color-theme-6.6.0/themes/color-them= e-example.el=20 > (source)...done > Loading c:/Documents and=20 > Settings/mheller/.emacs.d/site-lisp/color-theme-6.6.0/themes/color-them= e-library.el=20 > (source)...done > Loading c:/Documents and=20 > Settings/mheller/.emacs.d/site-lisp/themes/color-theme-railscasts.el=20 > (source)...done > Loading paren...done > For information about GNU Emacs and the GNU system, type C-h C-a. > Press key for agenda command: > OVERVIEW > CONTENTS...done > Starting new Ispell process [default] ... > Restoring clock data > Loading c:/Documents and Settings/mheller/.emacs.d/org-clock-save.el=20 > (source)...done > OVERVIEW > Loading vc-git...done > OVERVIEW > CONTENTS...done > OVERVIEW > CONTENTS...done > OVERVIEW > CONTENTS...done > Quit >=20 >=20 > _______________________________________________ > Emacs-orgmode mailing list > Please use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode