John Kitchin <jkitchin@andrew.cmu.edu> writes:

> Hi, I am trying to use this code to make parts of an org-file that are
> not a verse block invisible. That part works fine, and I can also unhide
> it. However, after that, I get errors like

Isn't this the job of narrowing and widening?  Though I guess this could
only show one verse block at the time.

I.e. use something like this:

(defun narrow-to-next-verse ()
  (interactive)
  (widen)
  (let ((next-elm (search-forward-regexp "^#\\+BEGIN_VERSE" nil t)))
    (when next-elm
      (widen)
      (goto-char next-elm)
      (org-narrow-to-element)
      (goto-char (point-min))
      (forward-line))))

Rasmus

--
Hooray!