# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1126365680 0
# Node ID f869318329b54a309ebaf9016edaabcbcf03224d
# Parent  6ad2caaeea0f5693a5ada3e67bc3323b3f7a0c2c
(narrow-to-page): Exclude _entire_ multi-line delimiter	from the region
narrowed to.

diff -r 6ad2caaeea0f -r f869318329b5 lisp/textmodes/page.el
--- a/lisp/textmodes/page.el	Sat Sep 10 15:09:06 2005 +0000
+++ b/lisp/textmodes/page.el	Sat Sep 10 15:21:20 2005 +0000
@@ -112,7 +112,7 @@
 	     (save-excursion
 	       (goto-char (match-beginning 0)) ; was (beginning-of-line)
 	       (looking-at page-delimiter)))
-	(beginning-of-line))
+	(goto-char (match-beginning 0))) ; was (beginning-of-line)
     (narrow-to-region (point)
 		      (progn
 			;; Find the top of the page.