[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] org-mode 7.01, error while scheduling item
From: |
Nick Dokos |
Subject: |
Re: [Orgmode] org-mode 7.01, error while scheduling item |
Date: |
Tue, 17 Aug 2010 14:24:09 -0400 |
Marcelo de Moraes Serpa <address@hidden> wrote:
> Hey guys, I'm still having this issue. I've tried downloading emacs
> again from emacsformacosx.com, but the problem is still there.
>
> Any ideas?
>
> Thanks,
>
> Marcelo.
>
> On Thu, Aug 5, 2010 at 1:37 PM, Marcelo de Moraes Serpa
> <address@hidden> wrote:
> > Hi Bastien, I've posted the backtrace, it should be in the thread, a
> > few messages earlier.
> >
I didn't find the backtrace in gmane, but I did find it eventually in
the list archive (I guess something thought it might be spam/malware and
got rid of it?) I append it (shortened to get rid of most of the binary
crud) to this mail for reference (it would be better if you reloaded the
appropriate .el files - org.el in this case - and *then* took the
backtrace.)
There are two select-window calls in org-eval-in-calendar: which one
fails? I presume the first one, but it might be a good idea to make
sure. Another way to ask the same thing: is there a *Calendar* buffer
popped up when you get the error? If not, why not?
Can you edebug-defun the function org-eval-in-calendar and then step
through it?
More questions than answers, but maybe something will click.
Nick
Function:
(defun org-eval-in-calendar (form &optional keepdate)
"Eval FORM in the calendar window and return to current window.
Also, store the cursor date in variable org-ans2."
(let ((sf (selected-frame))
(sw (selected-window)))
(select-window (get-buffer-window "*Calendar*" t))
(eval form)
(when (and (not keepdate) (calendar-cursor-to-date))
(let* ((date (calendar-cursor-to-date))
(time (encode-time 0 0 0 (nth 1 date) (nth 0 date) (nth 2 date))))
(setq org-ans2 (format-time-string "%Y-%m-%d" time))))
(move-overlay org-date-ovl (1- (point)) (1+ (point)) (current-buffer))
(select-window sw)
(org-select-frame-set-input-focus sf)))
Backtrace:
Debugger entered--Lisp error: (wrong-type-argument window-live-p nil)
select-window(nil)
org-eval-in-calendar(nil t)
byte-code(... [def date offset-years year month day calendar
calendar-forward-day time-to-days calendar-current-date nil 0 error "There was
no year zero" 31 2 4 23 10 abs zerop 100 400 365 (12 31 -1)
org-eval-in-calendar t current-local-map copy-keymap org-defkey "
" org-calendar-select [mouse-1] org-calendar-select-mouse [mouse-2] [(meta
shift left)] #[nil "\300\301!\207" [org-eval-in-calendar ...] 2 nil nil] [(meta
shift right)] #[nil "\300\301!\207" [org-eval-in-calendar ...] 2 nil nil]
[(meta shift up)] #[nil "\300\301!\207" [org-eval-in-calendar ...] 2 nil nil]
[(meta shift down)] #[nil "\300\301!\207" [org-eval-in-calendar ...] 2 nil nil]
[27 (shift left)] #[nil "\300\301!\207" [org-eval-in-calendar ...] 2 nil nil]
[27 (shift right)] #[nil "\300\301!\207" [org-eval-in-calendar ...] 2 nil nil]
[27 (shift up)] #[nil "\300\301!\207" [org-eval-in-calendar ...] 2 nil nil] [27
(shift down)] ...] 9)
org-read-date(nil to-time nil nil nil nil)
byte-code(... [time what end org-scheduled-time-regexp
org-deadline-time-regexp ts (scheduled deadline) org-back-to-heading t
outline-next-heading re-search-forward scheduled match-string 1 apply
encode-time org-parse-time-string org-get-compact-tod org-read-date nil to-time
(scheduled deadline) " " org-insert-time-stamp looking-at "\\( *\\)[^
\n]*" 0 "\n" "[ ]*" throw exit "[^
\n]*?" "[^
\n]*" insert-before-markers -1 org-indent-to-column deadline closed
replace-match "" "--+<[^>]+>" " +" 32 "[ ]*\n" 10 point-at-eol default-time
default-input org-insert-labeled-timestamps-at-point org-scheduled-string ...]
7)
org-add-planning-info(scheduled nil closed)
org-schedule(nil)
call-interactively(org-schedule nil nil)