Debugger entered--Lisp error: (wrong-type-argument arrayp 65) aref(65 0) (org-set-local (quote org-highest-priority) (aref (nth 0 prio) 0)) (progn (if (< ... 3) (setq prio ...)) (setq prio (mapcar ... prio)) (org-set-local (quote org-highest-priority) (aref ... 0)) (org-set-local (quote org-lowest-priority) (aref ... 0)) (org-set-local (quote org-default-priority) (aref ... 0))) (if prio (progn (if ... ...) (setq prio ...) (org-set-local ... ...) (org-set-local ... ...) (org-set-local ... ...))) (when prio (if (< ... 3) (setq prio ...)) (setq prio (mapcar ... prio)) (org-set-local (quote org-highest-priority) (aref ... 0)) (org-set-local (quote org-lowest-priority) (aref ... 0)) (org-set-local (quote org-default-priority) (aref ... 0))) (let ((re ...) (splitre "[ ]+") kwds key value cat arch tags links hw dws tail sep kws1 prio) (save-excursion (save-restriction ... ... ...)) (and cat (org-set-local ... cat)) (when prio (if ... ...) (setq prio ...) (org-set-local ... ...) (org-set-local ... ...) (org-set-local ... ...)) (and arch (org-set-local ... arch)) (and links (setq org-link-abbrev-alist-local ...)) (unless kwds (setq kwds ...) (if ... ...) (setq kwds ...)) (setq kwds (nreverse kwds)) (let (inter kws) (while ... ... ... ... ... ... ...) (setq org-todo-sets ... org-todo-kwd-alist ...)) (when tags (let ... ... ... ...))) (progn (org-set-local (quote org-todo-kwd-alist) nil) (org-set-local (quote org-todo-keywords-1) nil) (org-set-local (quote org-done-keywords) nil) (org-set-local (quote org-todo-heads) nil) (org-set-local (quote org-todo-sets) nil) (let (... ... kwds key value cat arch tags links hw dws tail sep kws1 prio) (save-excursion ...) (and cat ...) (when prio ... ... ... ... ...) (and arch ...) (and links ...) (unless kwds ... ... ...) (setq kwds ...) (let ... ... ...) (when tags ...)) (if (not org-done-keywords) (setq org-done-keywords ...)) (setq org-ds-keyword-length (+ 2 ...) org-not-done-keywords (org-delete-all org-done-keywords ...) org-todo-regexp (concat "\\<\\(" ... "\\)\\>") org-not-done-regexp (concat "\\<\\(" ... "\\)\\>") org-todo-line-regexp (concat "^\\(\\*+\\)[ ]*\\(?:\\(" ... "\\)\\>\\)? *\\(.*\\)") org-nl-done-regexp (concat "[ \n]\\*+[ ]+" "\\(?:" ... "\\)" "\\>") org-todo-line-tags-regexp (concat "^\\(\\*+\\)[ ]*\\(?:\\(" ... "\\)\\>\\)? *\\(.*?\\([ ]:[a-zA-Z0-9:address@hidden:[ ]*\\)?$\\)") org-looking-at-done-regexp (concat "^" "\\(?:" ... "\\)" "\\>") org-deadline-regexp (concat "\\<" org-deadline-string) org-deadline-time-regexp (concat "\\<" org-deadline-string " *<\\([^>]+\\)>") org-deadline-line-regexp (concat "\\<\\(" org-deadline-string "\\).*") org-scheduled-regexp (concat "\\<" org-scheduled-string) org-scheduled-time-regexp (concat "\\<" org-scheduled-string " *<\\([^>]+\\)>") org-closed-time-regexp (concat "\\<" org-closed-string " *\\[\\([^]]+\\)\\]") org-keyword-time-regexp (concat "\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-keyword-time-not-clock-regexp (concat "\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-maybe-keyword-time-regexp (concat "\\(\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)\\)?" " *\\([[<][0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} [^] \n>]*?[]>]\\|<%%([^ \n>]*>\\)") org-planning-or-clock-line-re (concat "\\(?:^[ ]*\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)\\>\\)")) (org-set-font-lock-defaults)) (if (org-mode-p) (progn (org-set-local ... nil) (org-set-local ... nil) (org-set-local ... nil) (org-set-local ... nil) (org-set-local ... nil) (let ... ... ... ... ... ... ... ... ... ...) (if ... ...) (setq org-ds-keyword-length ... org-not-done-keywords ... org-todo-regexp ... org-not-done-regexp ... org-todo-line-regexp ... org-nl-done-regexp ... org-todo-line-tags-regexp ... org-looking-at-done-regexp ... org-deadline-regexp ... org-deadline-time-regexp ... org-deadline-line-regexp ... org-scheduled-regexp ... org-scheduled-time-regexp ... org-closed-time-regexp ... org-keyword-time-regexp ... org-keyword-time-not-clock-regexp ... org-maybe-keyword-time-regexp ... org-planning-or-clock-line-re ...) (org-set-font-lock-defaults))) (when (org-mode-p) (org-set-local (quote org-todo-kwd-alist) nil) (org-set-local (quote org-todo-keywords-1) nil) (org-set-local (quote org-done-keywords) nil) (org-set-local (quote org-todo-heads) nil) (org-set-local (quote org-todo-sets) nil) (let (... ... kwds key value cat arch tags links hw dws tail sep kws1 prio) (save-excursion ...) (and cat ...) (when prio ... ... ... ... ...) (and arch ...) (and links ...) (unless kwds ... ... ...) (setq kwds ...) (let ... ... ...) (when tags ...)) (if (not org-done-keywords) (setq org-done-keywords ...)) (setq org-ds-keyword-length (+ 2 ...) org-not-done-keywords (org-delete-all org-done-keywords ...) org-todo-regexp (concat "\\<\\(" ... "\\)\\>") org-not-done-regexp (concat "\\<\\(" ... "\\)\\>") org-todo-line-regexp (concat "^\\(\\*+\\)[ ]*\\(?:\\(" ... "\\)\\>\\)? *\\(.*\\)") org-nl-done-regexp (concat "[ \n]\\*+[ ]+" "\\(?:" ... "\\)" "\\>") org-todo-line-tags-regexp (concat "^\\(\\*+\\)[ ]*\\(?:\\(" ... "\\)\\>\\)? *\\(.*?\\([ ]:[a-zA-Z0-9:address@hidden:[ ]*\\)?$\\)") org-looking-at-done-regexp (concat "^" "\\(?:" ... "\\)" "\\>") org-deadline-regexp (concat "\\<" org-deadline-string) org-deadline-time-regexp (concat "\\<" org-deadline-string " *<\\([^>]+\\)>") org-deadline-line-regexp (concat "\\<\\(" org-deadline-string "\\).*") org-scheduled-regexp (concat "\\<" org-scheduled-string) org-scheduled-time-regexp (concat "\\<" org-scheduled-string " *<\\([^>]+\\)>") org-closed-time-regexp (concat "\\<" org-closed-string " *\\[\\([^]]+\\)\\]") org-keyword-time-regexp (concat "\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-keyword-time-not-clock-regexp (concat "\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-maybe-keyword-time-regexp (concat "\\(\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)\\)?" " *\\([[<][0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} [^] \n>]*?[]>]\\|<%%([^ \n>]*>\\)") org-planning-or-clock-line-re (concat "\\(?:^[ ]*\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)\\>\\)")) (org-set-font-lock-defaults)) org-set-regexps-and-options() (let ((delay-mode-hooks t)) (outline-mode) (setq major-mode (quote org-mode)) (setq mode-name "Org") (progn (if ... ...) (unless ... ...) (let ... ...)) (use-local-map org-mode-map) (set-syntax-table org-mode-syntax-table) (setq local-abbrev-table org-mode-abbrev-table) (if (featurep ...) (when ... ... ... ...) (define-key org-mode-map [menu-bar headings] ...) (define-key org-mode-map [menu-bar hide] ...) (define-key org-mode-map [menu-bar show] ...)) (easy-menu-add org-org-menu) (easy-menu-add org-tbl-menu) (org-install-agenda-files-menu) (if org-descriptive-links (org-add-to-invisibility-spec ...)) (org-add-to-invisibility-spec (quote ...)) (when (featurep ...) (org-set-local ... t)) (setq outline-regexp "\\*+") (setq outline-level (quote org-outline-level)) (when (and org-ellipsis ... ... ...) (unless org-display-table ...) (set-display-table-slot org-display-table 4 ...) (setq buffer-display-table org-display-table)) (org-set-regexps-and-options) (org-set-local (quote calc-embedded-open-mode) "# ") (modify-syntax-entry 35 "<") (modify-syntax-entry 64 "w") (if org-startup-truncated (setq truncate-lines t)) (org-set-local (quote font-lock-unfontify-region-function) (quote org-unfontify-region)) (org-set-local (quote org-table-may-need-update) t) (org-add-hook (quote before-change-functions) (quote org-before-change-function) nil (quote local)) (org-add-hook (quote kill-buffer-hook) (quote org-check-running-clock) nil (quote local)) (org-set-autofill-regexps) (setq indent-line-function (quote org-indent-line-function)) (org-update-radio-target-regexp) (org-set-local (quote comment-padding) " ") (if (or ... ...) (org-add-hook ... ... ... ...) (org-set-local ... ...)) (if (and org-insert-mode-line-in-empty-file ... ...) (insert "# -*- mode: org -*-\n\n")) (unless org-inhibit-startup (when org-startup-align-all-tables ...) (cond ... ...))) (progn (make-local-variable (quote delay-mode-hooks)) (let (...) (outline-mode) (setq major-mode ...) (setq mode-name "Org") (progn ... ... ...) (use-local-map org-mode-map) (set-syntax-table org-mode-syntax-table) (setq local-abbrev-table org-mode-abbrev-table) (if ... ... ... ... ...) (easy-menu-add org-org-menu) (easy-menu-add org-tbl-menu) (org-install-agenda-files-menu) (if org-descriptive-links ...) (org-add-to-invisibility-spec ...) (when ... ...) (setq outline-regexp "\\*+") (setq outline-level ...) (when ... ... ... ...) (org-set-regexps-and-options) (org-set-local ... "# ") (modify-syntax-entry 35 "<") (modify-syntax-entry 64 "w") (if org-startup-truncated ...) (org-set-local ... ...) (org-set-local ... t) (org-add-hook ... ... nil ...) (org-add-hook ... ... nil ...) (org-set-autofill-regexps) (setq indent-line-function ...) (org-update-radio-target-regexp) (org-set-local ... " ") (if ... ... ...) (if ... ...) (unless org-inhibit-startup ... ...))) (delay-mode-hooks (outline-mode) (setq major-mode (quote org-mode)) (setq mode-name "Org") (progn (if ... ...) (unless ... ...) (let ... ...)) (use-local-map org-mode-map) (set-syntax-table org-mode-syntax-table) (setq local-abbrev-table org-mode-abbrev-table) (if (featurep ...) (when ... ... ... ...) (define-key org-mode-map [menu-bar headings] ...) (define-key org-mode-map [menu-bar hide] ...) (define-key org-mode-map [menu-bar show] ...)) (easy-menu-add org-org-menu) (easy-menu-add org-tbl-menu) (org-install-agenda-files-menu) (if org-descriptive-links (org-add-to-invisibility-spec ...)) (org-add-to-invisibility-spec (quote ...)) (when (featurep ...) (org-set-local ... t)) (setq outline-regexp "\\*+") (setq outline-level (quote org-outline-level)) (when (and org-ellipsis ... ... ...) (unless org-display-table ...) (set-display-table-slot org-display-table 4 ...) (setq buffer-display-table org-display-table)) (org-set-regexps-and-options) (org-set-local (quote calc-embedded-open-mode) "# ") (modify-syntax-entry 35 "<") (modify-syntax-entry 64 "w") (if org-startup-truncated (setq truncate-lines t)) (org-set-local (quote font-lock-unfontify-region-function) (quote org-unfontify-region)) (org-set-local (quote org-table-may-need-update) t) (org-add-hook (quote before-change-functions) (quote org-before-change-function) nil (quote local)) (org-add-hook (quote kill-buffer-hook) (quote org-check-running-clock) nil (quote local)) (org-set-autofill-regexps) (setq indent-line-function (quote org-indent-line-function)) (org-update-radio-target-regexp) (org-set-local (quote comment-padding) " ") (if (or ... ...) (org-add-hook ... ... ... ...) (org-set-local ... ...)) (if (and org-insert-mode-line-in-empty-file ... ...) (insert "# -*- mode: org -*-\n\n")) (unless org-inhibit-startup (when org-startup-align-all-tables ...) (cond ... ...))) org-mode() (let ((org-inhibit-startup t)) (org-mode)) org-mode-restart() call-interactively(org-mode-restart) (cond ((equal ... "TBLFM") (save-excursion ... ... ...)) (t (call-interactively ...))) (cond ((or org-clock-overlays org-occur-highlights org-latex-fragment-image-overlays) (org-remove-clock-overlays) (org-remove-occur-highlights) (org-remove-latex-fragment-image-overlays) (message "Temporary highlights/overlays removed from current buffer")) ((and ... ...) (funcall org-finish-function)) ((org-on-target-p) (call-interactively ...)) ((org-on-heading-p) (call-interactively ...)) ((org-at-table\.el-p) (require ...) (beginning-of-line 1) (re-search-forward "|" ...) (call-interactively ...)) ((org-at-table-p) (org-table-maybe-eval-formula) (if arg ... ...) (call-interactively ...)) ((org-at-item-checkbox-p) (call-interactively ...)) ((org-at-item-p) (call-interactively ...)) ((save-excursion ... ...) (cond ... ...)) (t (error "C-c C-c can do nothing useful at this location."))) (let ((org-enable-table-editor t)) (cond (... ... ... ... ...) (... ...) (... ...) (... ...) (... ... ... ... ...) (... ... ... ...) (... ...) (... ...) (... ...) (t ...))) org-ctrl-c-ctrl-c(nil) call-interactively(org-ctrl-c-ctrl-c)