[O] Agenda fails to display

[Sharon Kimble]

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\203
E\203
P\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