[Orgmode] BUG - Can not refile to the last task

[Bernt Hansen]

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@)¢Ì=ƒ!ÈÍÊ\"ˆÎ!ˆÏ ˆÐ        
!ˆ\fƒcÑed\"
VƒWebˆÒ
¥yˆ`dbˆÒ
¥
Zyˆ`|ˆ)ÓcˆebˆÔÕÖ \"ˆ× ˆÔØ!ˆÙÊÔØ!ˆŠÚ ˆ+ه" [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