normally I would use narrowing, but I want to see all the verses in the document at once., so I was going to make all the other text temporarily invisible.

John

-----------------------------------
Professor John Kitchin 
Doherty Hall A207F
Department of Chemical Engineering
Carnegie Mellon University
Pittsburgh, PA 15213
412-268-7803

On Tue, Apr 26, 2016 at 2:36 PM, Rasmus <rasmus@gmx.us> wrote:
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!