Bug in `org-get-outline-path'

Bug in `org-get-outline-path'

[Ulf Stegemann]

[-- Attachment #1: Type: text/plain, Size: 215 bytes --]

Hi,

I've encountered a problem with `org-get-outline-path' (as of today)
which fails if the (optional) argument `level' is nil. The error occured
when calling `org-archive-subtree'. The following fixes it for me.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: org-get-outline-path-fix.patch --]
[-- Type: text/x-patch, Size: 469 bytes --]

--- org.el.orig	2008-12-17 09:55:44.000000000 +0100
+++ org.el	2008-12-17 10:23:38.000000000 +0100
@@ -7542,7 +7542,7 @@
 
 (defun org-get-outline-path (&optional fastp level heading)
   "Return the outline path to the current entry, as a list."
-  (if (> level 19) (error "Outline path failure, more than 19 levels."))
+  (if (and level (> level 19)) (error "Outline path failure, more than 19 levels."))
   (if fastp
       (progn
 	(loop for i from level upto 19 do

[-- Attachment #3: Type: text/plain, Size: 5 bytes --]


Ulf

[-- Attachment #4: Type: text/plain, Size: 204 bytes --]

_______________________________________________
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

Re: Bug in `org-get-outline-path'

[Carsten Dominik]

Fixed, thanks.

- Carsten

On Dec 17, 2008, at 10:33 AM, Ulf Stegemann wrote:

> Hi,
>
> I've encountered a problem with `org-get-outline-path' (as of today)
> which fails if the (optional) argument `level' is nil. The error  
> occured
> when calling `org-archive-subtree'. The following fixes it for me.
>
> --- org.el.orig	2008-12-17 09:55:44.000000000 +0100
> +++ org.el	2008-12-17 10:23:38.000000000 +0100
> @@ -7542,7 +7542,7 @@
>
> (defun org-get-outline-path (&optional fastp level heading)
>   "Return the outline path to the current entry, as a list."
> -  (if (> level 19) (error "Outline path failure, more than 19  
> levels."))
> +  (if (and level (> level 19)) (error "Outline path failure, more  
> than 19 levels."))
>   (if fastp
>       (progn
> 	(loop for i from level upto 19 do
>
> Ulf
> _______________________________________________
> 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