I have been using this outside of org-mode for many years but it is
broken in 7.7.
Debugger entered--Lisp error: (error "Before first headline at position 134230
in buffer init")
signal(error ("Before first headline at position 134230 in buffer init"))
error("Before first headline at position %d in buffer %s" 134230 #<buffer
init>)
byte-code("\300\301`p#\207" [error "Before first headline at position %d in
buffer %s"] 4)
org-back-to-heading(t)
org-narrow-to-subtree()
call-interactively(org-narrow-to-subtree nil nil)
Leo