[emacs-wiki-discuss] sudden failure to save pages

[Paul Lussier]

Hi all,

For some reason I'm suddenly unable to save my planner pages.  I'm not
sure what's different or what I changed, if anything. I certainly
don't remember changing anything...  Here's a backtrace if anyone can
make any sense out of it:

Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil)
  +(0 nil)
  (let ((case-fold-search t) (ch ...) status) (skip-chars-forward "0123456789 "\
) (setq status (char-after)) (+ (cond ... ... ... ... ...) (cond ... ... ...)))
  planner-sort-tasks-basic()
  (if planner-on-date-page (planner-sort-tasks-basic) (planner-sort-tasks-by-da\
te))
  planner-sort-tasks-default-key()
  byte-code("^H\203 address@hidden address@hidden@^KÃT \210    `)B\207" 
[startkeyf\
un start endkeyfun endrecfun done t] 2)
  sort-build-lists(forward-line end-of-line planner-sort-tasks-default-key nil)
  sort-subr(nil forward-line end-of-line planner-sort-tasks-default-key nil nil\
)
  (condition-case err (sort-subr nil (quote forward-line) (quote end-of-line) p\
lanner-sort-tasks-key-function nil nil) (wrong-number-of-arguments (sort-subr n\
il ... ... planner-sort-tasks-key-function nil)))
  (save-restriction (narrow-to-region here (point)) (goto-char here) (condition\
-case err (sort-subr nil ... ... planner-sort-tasks-key-function nil nil) (wron\
g-number-of-arguments ...)) (goto-char (point-max)))
  (let ((here ...)) (while (and ... ...) (forward-line 1)) (save-restriction (n\
arrow-to-region here ...) (goto-char here) (condition-case err ... ...) (goto-c\
har ...)))
  (while (re-search-forward "^#[A-C][0-9]*" nil t) (goto-char (match-beginning \
0)) (let (...) (while ... ...) (save-restriction ... ... ... ...)))
  (let ((case-fold-search nil) (planner-on-date-page ...) (old-task ...) (line-\
offset ...) (old-point ...)) (goto-char (point-min)) (while (re-search-forward \
"^#[A-C][0-9]*" nil t) (goto-char ...) (let ... ... ...)) (if old-task (progn .\
.. ...) (goto-char old-point)) nil)
  planner-sort-tasks()
  (progn (planner-sort-tasks))
  (if planner-sort-tasks-automatically (progn (planner-sort-tasks)))
  (when planner-sort-tasks-automatically (planner-sort-tasks))
  planner-sort-tasks-maybe()
  run-hook-with-args-until-success(planner-sort-tasks-maybe)
  basic-save-buffer()
  save-buffer(1)
  call-interactively(save-buffer)


-- 

Seeya,
Paul