X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fpage.el;h=77502b9dba6344425c191fd8cf33bfe4464a2a7a;hb=a2d5e715cb949a9225dedcaec749cd3ec9a41b7b;hp=196a30a888866752722189d7c8648351f507227a;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910;p=chise%2Fxemacs-chise.git.1 diff --git a/lisp/page.el b/lisp/page.el index 196a30a..77502b9 100644 --- a/lisp/page.el +++ b/lisp/page.el @@ -53,7 +53,7 @@ A page boundary is any line whose beginning matches the regexp (and (save-excursion (re-search-backward page-delimiter nil t)) (= (match-end 0) (point)) (goto-char (match-beginning 0))) - (forward-char -1) + (backward-char 1) (if (re-search-backward page-delimiter nil t) ;; We found one--move to the end of it. (goto-char (match-end 0))