[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] Agenda fails to display
From: |
Sharon Kimble |
Subject: |
[O] Agenda fails to display |
Date: |
Mon, 20 Apr 2015 11:02:01 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.5.50 (gnu/linux) |
A problem has developed overnight where I am not able to display my
usual 3-week agenda. I can display a list of TODOs but no display of
agenda. When I try "C-c a a" It displays "21 days-agenda (W17-W19):"
and nothing else. But, it does throw up this debug info, rather long
unfortunately, but I'll put it at the end.
This is with org-version "Org-mode version 8.2.10 (release_8.2.10 @
/home/boudiccas/git/org-mode/lisp/)" which I cloned on the 18th
April.
My last action on my organiser file was to change the date of a
scheduled task.
How can I get it working properly again please?
Thanks
Sharon.
--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (void-variable org-ts-regexp-inactive)
(format "^[ ]*-[ ]+\\(?:State \"%s\".*%s%s\\)" (regexp-opt
org-done-keywords) org-ts-regexp-inactive (let ((value (cdr (assq (quote done)
org-log-note-headings)))) (if (not value) "" (concat "\\|" (org-replace-escapes
(regexp-quote value) (cons (cons "%d" org-ts-regexp-inactive) (cons (cons "%D"
org-ts-regexp) (cons ... ...))))))))
(let* ((maxdays (+ org-habit-preceding-days org-habit-following-days))
(reversed org-log-states-order-reversed) (search (if reversed (quote
re-search-forward) (quote re-search-backward))) (limit (if reversed end
(point))) (count 0) (re (format "^[ ]*-[ ]+\\(?:State \"%s\".*%s%s\\)"
(regexp-opt org-done-keywords) org-ts-regexp-inactive (let ((value (cdr ...)))
(if (not value) "" (concat "\\|" (org-replace-escapes ... ...))))))) (if
reversed nil (goto-char end)) (while (and (< count maxdays) (funcall search re
limit t)) (setq closed-dates (cons (time-to-days (org-time-string-to-time (or
(org-match-string-no-properties 1) (org-match-string-no-properties 2))))
closed-dates)) (setq count (1+ count))))
(let* ((scheduled (org-get-scheduled-time (point))) (scheduled-repeat
(org-get-repeat org-scheduled-string)) (end (org-entry-end-position))
(habit-entry (org-no-properties (nth 4 (org-heading-components)))) closed-dates
deadline dr-days sr-days sr-type) (if scheduled (setq scheduled (time-to-days
scheduled)) (error "Habit %s has no scheduled date" habit-entry)) (if
scheduled-repeat nil (error "Habit '%s' has no scheduled repeat period or has
an incorrect one" habit-entry)) (setq sr-days (org-habit-duration-to-days
scheduled-repeat) sr-type (progn (string-match "[\\.+]?\\+" scheduled-repeat)
(org-match-string-no-properties 0 scheduled-repeat))) (if (> sr-days 0) nil
(error "Habit %s scheduled repeat period is less than 1d" habit-entry)) (if
(string-match "/\\([0-9]+[dwmy]\\)" scheduled-repeat) (progn (setq dr-days
(org-habit-duration-to-days (match-string-no-properties 1 scheduled-repeat)))
(if (<= dr-days sr-days) (error "Habit %s deadline repeat period is less than
or equal to scheduled (%s)" habit-entry scheduled-repeat)) (setq deadline (+
scheduled (- dr-days sr-days))))) (org-back-to-heading t) (let* ((maxdays (+
org-habit-preceding-days org-habit-following-days)) (reversed
org-log-states-order-reversed) (search (if reversed (quote re-search-forward)
(quote re-search-backward))) (limit (if reversed end (point))) (count 0) (re
(format "^[ ]*-[ ]+\\(?:State \"%s\".*%s%s\\)" (regexp-opt
org-done-keywords) org-ts-regexp-inactive (let ((value ...)) (if (not value) ""
(concat "\\|" ...)))))) (if reversed nil (goto-char end)) (while (and (< count
maxdays) (funcall search re limit t)) (setq closed-dates (cons (time-to-days
(org-time-string-to-time (or ... ...))) closed-dates)) (setq count (1+
count)))) (list scheduled sr-days deadline dr-days closed-dates sr-type))
(save-excursion (if pom (goto-char pom)) (progn (or (org-is-habit-p (point))
(signal (quote cl-assertion-failed) (list (quote (org-is-habit-p (point))))))
nil) (let* ((scheduled (org-get-scheduled-time (point))) (scheduled-repeat
(org-get-repeat org-scheduled-string)) (end (org-entry-end-position))
(habit-entry (org-no-properties (nth 4 (org-heading-components)))) closed-dates
deadline dr-days sr-days sr-type) (if scheduled (setq scheduled (time-to-days
scheduled)) (error "Habit %s has no scheduled date" habit-entry)) (if
scheduled-repeat nil (error "Habit '%s' has no scheduled repeat period or has
an incorrect one" habit-entry)) (setq sr-days (org-habit-duration-to-days
scheduled-repeat) sr-type (progn (string-match "[\\.+]?\\+" scheduled-repeat)
(org-match-string-no-properties 0 scheduled-repeat))) (if (> sr-days 0) nil
(error "Habit %s scheduled repeat period is less than 1d" habit-entry)) (if
(string-match "/\\([0-9]+[dwmy]\\)" scheduled-repeat) (progn (setq dr-days
(org-habit-duration-to-days (match-string-no-properties 1 scheduled-repeat)))
(if (<= dr-days sr-days) (error "Habit %s deadline repeat period is less than
or equal to scheduled (%s)" habit-entry scheduled-repeat)) (setq deadline (+
scheduled (- dr-days sr-days))))) (org-back-to-heading t) (let* ((maxdays (+
org-habit-preceding-days org-habit-following-days)) (reversed
org-log-states-order-reversed) (search (if reversed (quote re-search-forward)
(quote re-search-backward))) (limit (if reversed end (point))) (count 0) (re
(format "^[ ]*-[ ]+\\(?:State \"%s\".*%s%s\\)" (regexp-opt
org-done-keywords) org-ts-regexp-inactive (let (...) (if ... "" ...))))) (if
reversed nil (goto-char end)) (while (and (< count maxdays) (funcall search re
limit t)) (setq closed-dates (cons (time-to-days (org-time-string-to-time ...))
closed-dates)) (setq count (1+ count)))) (list scheduled sr-days deadline
dr-days closed-dates sr-type)))
org-habit-parse-todo()
byte-code("\306 \210\307\310!\311\310\224S\312 \313\216\314 *
address@hidden@p\n&\211BAZC\320`\321\"DE\205CC\322WF\311GH\205h\323 \324
{I\312
\325\216\326JI\"\205g\307\310I\"address@hidden&ZL^\202\233\322)\211M\203\257ML\330\315\211#)\202\263\330\315\"N\312
\331\216\326\332\"*\203\326\316!\316B\317\311p\n&W\203\326\322NN\322V\203\346CN[U\2047\333N!\203\364C\322U\2047CN\\\322W\203\334C!OW\203E\203P\2037E\203<\335\336!\203<\203<\315\211G\203<\337\340!\2051\340
\211Q\203<\212\fR\235\211S\203^T\204YC\322U\203Y\337\340!\203^\340
\203^\311\202\200G\203hQ\202p\337\340!\205p\340 Q\341
U\320`\342\"VW\343=\203\233\344`!\203\233\322B\345\344`!!ZX\203\233\346\347\311\"\210\350\351\311\315#\204\253\346\347\311\"\210\202\200\322\225b\210\322\224XQ\203\325Y\203\315E\204\371\335\352!\203\371*\203\371\346\347\311\"\210\202\371W\315=\204\350W\353=\203\371F\203\371\354XZ\"\211[\203\371\346\347\311\"\210\\\355=\206\\<\203\356\\>\206\\\315=\205]\315=\206\356]>^\357\311^?\"_\360\361\362
!\363\"``\364\311w\210`{a\326\365\"address@hidden@\310CZ\"a`U_C\322U\205zb\311Q&
\203;Q\204\222F\203\222\372\202\234E\203\233\373\202\234\374dQ\205\245\375
Q\376
e\377d\201dS\203\274\201h\202\276d\201i\201j\n!\201k\201jX!\201lF\203\335\201m\202\340\201n\201fF\203\355B\202\357f\201oB\201DD\201``\201pQ\203\201qQ!\202!\201r\201s\201tCZ\201u
!#\201vU\201wV\201xQ\304\f&\210 gBg)\311\207" [s txt pos
save-match-data-internal todo-state org-agenda-repeating-timestamp-show-all
org-agenda-skip match-string 1 nil match-data ((byte-code "\301\302\"\207"
[save-match-data-internal set-match-data evaporate] 3)) org-get-todo-state t
org-time-string-to-absolute past get-text-property org-appt-warntime 0
point-at-bol point-at-eol ((byte-code "\301\302\"\207"
[save-match-data-internal set-match-data evaporate] 3)) string-match
post-deadline org-get-wdays ((byte-code "\301\302\"\207"
[save-match-data-internal set-match-data evaporate] 3)) "--[0-9]+[hdwmy]" zerop
abs boundp org-habit-show-all-today functionp org-is-habit-p org-get-category
org-category-position repeated-after-deadline org-get-deadline-time
time-to-days throw :skip re-search-backward "^\\*+[ ]+"
org-habit-show-habits-only-for-today not-today assoc always agenda
org-get-tags-at make-string org-reduced-level ...] 32)
org-agenda-get-scheduled(nil)
org-agenda-get-day-entries("/home/boudiccas/.emacs.d/org/organiser.org" (4 20
2015) :deadline :scheduled :timestamp :sexp)
apply(org-agenda-get-day-entries "/home/boudiccas/.emacs.d/org/organiser.org"
(4 20 2015) (:deadline :scheduled :timestamp :sexp))
byte-code("\306!\210 \307 \235\203 \310\311 \"\312
\235\203 \310\313 \"\n\203>\311 \235\203/\310\311 \"\307 B\313
\235\203>\310\313 \"\312 B\204J\310\307\310\311
\"\"\f\314>\203Z\315\316#\202t\f\203l\317\315\320\321
\"$\202t\317\315 $)\320\"\306\207" [file org-agenda-entry-types
with-hour org-agenda-include-deadlines org-agenda-show-log-scoped date
org-check-agenda-file :deadline* delq :deadline :scheduled* :scheduled (only
clockcheck) org-agenda-get-day-entries :closed apply append (:closed) rtn
rtnall] 7)
byte-code("\206)
\203(\n\203 ;\203 \306\307\n#\202%\n\203$\306\310\n\"\202%\311\206)address@hidden;\203B\314\315\316\317#!\320\321!\210\322\321!\210\323A\206WB\206WC!A\324
D\206dDE\325AE\"\211F\326=\204{F\327=\205}GG\330\316\331\"address@hidden@]Ne\337e!@)address@hidden@iNe\337e!@)j\344i!k\344j!l`Tm\203\262\345\346m!\316\347\350$\351\261\210\202\340\352A!\353jiZ\354W\203\333klU\203\321\306\355k\"\202\334\306\356kl#\202\334\357\360\261\210,\361T`S\347\350\362\317F#\210\363T!\210N\211AN\242\211L\203\374\333L!Y`TLDU\211\\\204
Z\204&LEU\203&`Z\2023Z\2033[\2043`[HI\316WI\211AI\242\211X\203N\364\365\215\210\202:n\203i\317o\366\367!\210\370Y!V\371WV\"W)W\204sp\203\362OTOq;\203\211\372q\373Y!\"\202\216qY!\351\261\210\374T`S\347\375Y!$\210\374T`S\362\317$\210\374T`S\376\317$\210\374T`S\377O$\210\\\203\310\374T`S\324\317$\210\201yWF\\#\211W\203\343\201zW\321\"\351\261\210\374T`S\201{L$\210\374T`S\377O$\210\202\362r\203U]\203U\330\316\331\"\346s!\316tu\201|u\201}\"u\201~u\201]#u\201~u\201\200^#u\201~u\201\201\321#u\201\202\201\203u\"\211tc\210+eb\210v\204b\201\204
\210\201\205e!\203r\201\205d!\204\237dSb\210\201\206\201\207!\210\201\205Z\206\211\201\210!\204\237Z\206\225\201\210b\210\201\206\201\210!\210Z\206\247\201\210b\210\361ed\201\211\321\201\212`AE\201\213b\201\214w\257#\210S\201\215=\203\325\201\216
\210\201\217 \210\317x\201\220\357!.\207" [org-agenda-buffer-tmp-name
org-agenda-sticky org-keys org-match org-agenda-buffer-name start-day format
"*Org Agenda(%s:%s)*" "*Org Agenda(%s)*" "*Org Agenda(a)*" org-agenda-prepare
"Day/Week" time-to-days org-read-date nil t org-compile-prefix-format agenda
org-set-sorting-strategy org-agenda-ndays-to-span org-today
org-agenda-span-to-ndays 7 14 org-agenda-files ifmode calendar-day-of-week
calendar-gregorian-from-absolute 0 org-agenda-list quote last org-starting-day
make-local-variable org-arg-loc org-agenda-current-span org-days-to-iso-week
org-add-props copy-sequence face org-agenda-structure "\n" org-agenda-span-name
"-agenda" 350 " (W%02d)" " (W%02d-W%02d)" "" ":\n" add-text-properties ...] 12)
org-agenda-list(nil)
#<subr call-interactively>(org-agenda-list nil nil)
ad-Advice-call-interactively(#<subr call-interactively> org-agenda-list nil
nil)
apply(ad-Advice-call-interactively #<subr call-interactively>
(org-agenda-list nil nil))
call-interactively(org-agenda-list nil nil)
command-execute(org-agenda-list)
--8<---------------cut here---------------end--------------->8---
--
A taste of linux = http://www.sharons.org.uk
TGmeds = http://www.tgmeds.org.uk
Debian testing, fluxbox 1.3.7, emacs 24.5.50.1
signature.asc
Description: PGP signature
- [O] Agenda fails to display,
Sharon Kimble <=