Re: [O] Is this (error (error ...)) form intentional?

[Kyle Meyer]

Marcin Borkowski <address@hidden> writes:

> From org.el:
>
> (defun org-back-to-heading (&optional invisible-ok)
>   "Call `outline-back-to-heading', but provide a better error message."
>   (condition-case nil
>       (outline-back-to-heading invisible-ok)
>     (error (error "Before first headline at position %d in buffer %s"
>                 (point) (current-buffer)))))
>
> Frankly, I don't see the point of nesting `error'.

One is matching the signaled error, and the other is re-throwing the
error with position and buffer information included.

--
Kyle