Fixed, thanks.
- Carsten
On Sep 19, 2008, at 10:17 PM, Bernt Hansen wrote:
Hi Carsten,
I found another one... but this was broken in 6.06b as well
I can't refile a task to the last task in the file unless another task
follows it.
I normally refile to level 1 entries. If you have a file like this
,----
| * First Task
| ** Refile me
| * Other stuff
| * Last Task
`----
then you can't refile (C-c C-w) the 'Refile me' task to 'Last Task'.
The workaround is just to create something after * Last Task like *
Junk
so you can refile to Last Task - then just delete * Junk.
I get the following error:
,----
| Debugger entered--Lisp error: (wrong-type-argument integer-or-
marker-p nil)
| goto-char(nil)
| (save-restriction (widen) (goto-char pos) (looking-at outline-
regexp) (setq level (org-get-valid-level ... 1)) (goto-char (if
reversed ... ...)) (bookmark-set "org-refile-last-stored") (org-
paste-subtree level))
| (save-excursion (save-restriction (widen) (goto-char pos)
(looking-at outline-regexp) (setq level ...) (goto-char ...)
(bookmark-set "org-refile-last-stored") (org-paste-subtree level)))
| (save-excursion (set-buffer (setq nbuf ...)) (setq reversed (org-
notes-order-reversed-p)) (save-excursion (save-
restriction ... ... ... ... ... ... ...)))
| (if goto (progn (switch-to-buffer nbuf) (goto-char pos) (org-
show-context ...)) (org-copy-subtree 1 nil t) (save-excursion (set-
buffer ...) (setq reversed ...) (save-excursion ...)) (org-cut-
subtree) (setq org-markers-to-move nil) (message "Entry refiled to
\"%s\"" (car it)))
| (progn (setq file (nth 1 it) re (nth 2 it) pos (nth 3 it)) (setq
nbuf (or ... ...)) (if goto (progn ... ... ...) (org-copy-subtree 1
nil t) (save-excursion ... ... ...) (org-cut-subtree) (setq org-
markers-to-move nil) (message "Entry refiled to \"%s\"" ...)))
| (if (setq it (org-refile-get-location ... default-buffer))
(progn (setq file ... re ... pos ...) (setq nbuf ...) (if
goto ... ... ... ... ... ...)))
| (when (setq it (org-refile-get-location ... default-buffer))
(setq file (nth 1 it) re (nth 2 it) pos (nth 3 it)) (setq nbuf
(or ... ...)) (if goto (progn ... ... ...) (org-copy-subtree 1 nil
t) (save-excursion ... ... ...) (org-cut-subtree) (setq org-markers-
to-move nil) (message "Entry refiled to \"%s\"" ...)))
| (if (equal goto (quote ...)) (org-refile-goto-last-stored) (when
(setq it ...) (setq file ... re ... pos ...) (setq nbuf ...) (if
goto ... ... ... ... ... ...)))
| (let* ((cbuf ...) (filename ...) pos it nbuf file re level
reversed) (if (equal goto ...) (org-refile-goto-last-stored)
(when ... ... ... ...)))
| org-refile(nil)
| call-interactively(org-refile)
| recursive-edit()
| byte-code("Æ @Ç=!ÈÉÊ\"ËÉ!A@)¢Ì=!ÈÍÊ\"Î !Ï Ð !\fcÑed\"
VWebÒ
¥y` dbÒ
¥
Zy`|)ÓcebÔÕÖ \"× ÔØ!ÙÊ ÔØ!Ú +Ù" [unread-command-char
debugger-args x debugger-buffer noninteractive debugger-batch-max-
lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop-to-
buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n"
message "%s" buffer-string kill-emacs "" nil recursive-edit
middlestart buffer-read-only standard-output] 4)
| debug(error (wrong-type-argument integer-or-marker-p nil))
| org-refile(nil)
| call-interactively(org-refile)
`----
-Bernt
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
