(show-children): Don't call outline-level at eob.

1 files changed, 3 insertions, 1 deletions

diff --git a/lisp/textmodes/ooutline.el b/lisp/textmodes/ooutline.el
index c3f05af00bb..207bffcdf74 100644
--- a/lisp/textmodes/ooutline.el
+++ b/lisp/textmodes/ooutline.el
@@ -372,7 +372,9 @@ Default is enough to cause the following heading to appear."
             (beginning-of-line)
             (let ((start-level (funcall outline-level)))
               (outline-next-heading)
-              (max 1 (- (funcall outline-level) start-level))))))
+              (if (eobp)
+                  1
+                (max 1 (- (funcall outline-level) start-level)))))))
   (save-excursion
    (save-restriction
     (beginning-of-line)