emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* [PATCH] Fix org-goto when no file exists for a buffer
@ 2009-12-09 23:13 Paul Griepentrog
  2009-12-10  8:15 ` Carsten Dominik
  0 siblings, 1 reply; 2+ messages in thread
From: Paul Griepentrog @ 2009-12-09 23:13 UTC (permalink / raw)
  To: emacs-orgmode

Thanks for Org-mode!

Every once in a while I use org-mode in a buffer that is not
associated with a file... and then org-goto gets confused.  To repeat:

BUFFER-NO-FILE
---------------
* One
  - a
* Two
  - b
---------------

M-x org-mode
C-c C-j
org-get-refile-targets: Wrong type argument: stringp, nil

;; Environment & Settings
Org-mode version 6.33trans
"GNU Emacs 23.1.1 (i386-mingw-nt5.1.2600)
 of 2009-07-29 on SOFT-MJASON"

;; Org keybinding preferences
(setq
 org-M-RET-may-split-line              nil
 org-completion-use-ido                t
 org-fast-tag-selection-single-key     'expert
 org-goto-interface                    'outline-path-completion
 org-outline-path-complete-in-steps    nil           ; use iDo when jumping
 org-refile-targets                    '((nil :maxlevel . 2))
                                           ; Search current buffer, upto depth=2
 org-special-ctrl-a/e                  t
 org-special-ctrl-k                    t)

This patch fixes it:

--- c:/cygwin/home/pgriepentrog/rc.git/emacs/download/org-mode.git/lisp/org.el	2009-12-09
13:45:42.031250000 -0800
+++ c:/cygwin/home/pgriepentrog/Local/share/emacs/site-lisp/org.el	2009-12-09
14:17:57.203125000 -0800
@@ -8986,9 +8986,9 @@
 	  (with-current-buffer
 	      (if (bufferp f) f (org-get-agenda-file-buffer f))
 	    (if (bufferp f) (setq f (buffer-file-name (buffer-base-buffer f))))
-	    (setq f (expand-file-name f))
 	    (if (eq org-refile-use-outline-path 'file)
-		(push (list (file-name-nondirectory f) f nil nil) targets))
+                (progn (setq f (expand-file-name f))
+                       (push (list (file-name-nondirectory f) f nil
nil) targets)))
 	    (save-excursion
 	      (save-restriction
 		(widen)

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: [PATCH] Fix org-goto when no file exists for a buffer
  2009-12-09 23:13 [PATCH] Fix org-goto when no file exists for a buffer Paul Griepentrog
@ 2009-12-10  8:15 ` Carsten Dominik
  0 siblings, 0 replies; 2+ messages in thread
From: Carsten Dominik @ 2009-12-10  8:15 UTC (permalink / raw)
  To: Paul Griepentrog; +Cc: emacs-orgmode

Applied, thanks.

- Carsten

On Dec 10, 2009, at 12:13 AM, Paul Griepentrog wrote:

> Thanks for Org-mode!
>
> Every once in a while I use org-mode in a buffer that is not
> associated with a file... and then org-goto gets confused.  To repeat:
>
> BUFFER-NO-FILE
> ---------------
> * One
>  - a
> * Two
>  - b
> ---------------
>
> M-x org-mode
> C-c C-j
> org-get-refile-targets: Wrong type argument: stringp, nil
>
> ;; Environment & Settings
> Org-mode version 6.33trans
> "GNU Emacs 23.1.1 (i386-mingw-nt5.1.2600)
> of 2009-07-29 on SOFT-MJASON"
>
> ;; Org keybinding preferences
> (setq
> org-M-RET-may-split-line              nil
> org-completion-use-ido                t
> org-fast-tag-selection-single-key     'expert
> org-goto-interface                    'outline-path-completion
> org-outline-path-complete-in-steps    nil           ; use iDo when  
> jumping
> org-refile-targets                    '((nil :maxlevel . 2))
>                                           ; Search current buffer,  
> upto depth=2
> org-special-ctrl-a/e                  t
> org-special-ctrl-k                    t)
>
> This patch fixes it:
>
> --- c:/cygwin/home/pgriepentrog/rc.git/emacs/download/org-mode.git/ 
> lisp/org.el	2009-12-09
> 13:45:42.031250000 -0800
> +++ c:/cygwin/home/pgriepentrog/Local/share/emacs/site-lisp/org.el	 
> 2009-12-09
> 14:17:57.203125000 -0800
> @@ -8986,9 +8986,9 @@
> 	  (with-current-buffer
> 	      (if (bufferp f) f (org-get-agenda-file-buffer f))
> 	    (if (bufferp f) (setq f (buffer-file-name (buffer-base-buffer  
> f))))
> -	    (setq f (expand-file-name f))
> 	    (if (eq org-refile-use-outline-path 'file)
> -		(push (list (file-name-nondirectory f) f nil nil) targets))
> +                (progn (setq f (expand-file-name f))
> +                       (push (list (file-name-nondirectory f) f nil
> nil) targets)))
> 	    (save-excursion
> 	      (save-restriction
> 		(widen)
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2009-12-10  8:48 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2009-12-09 23:13 [PATCH] Fix org-goto when no file exists for a buffer Paul Griepentrog
2009-12-10  8:15 ` Carsten Dominik

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).