diff options
author | Michaël Cadilhac <michael.cadilhac@lrde.org> | 2007-05-10 11:54:33 +0000 |
---|---|---|
committer | Michaël Cadilhac <michael.cadilhac@lrde.org> | 2007-05-10 11:54:33 +0000 |
commit | b52efb9fafe39ea3370a4a30d046915666e9ad2c (patch) | |
tree | 3ddc45134356c075bb85ee0069f6a11005a9c49a /lisp/man.el | |
parent | ed9bc8a2e6603eff98f0894b782c3d98d1e877aa (diff) | |
download | emacs-b52efb9fafe39ea3370a4a30d046915666e9ad2c.tar.gz emacs-b52efb9fafe39ea3370a4a30d046915666e9ad2c.tar.bz2 emacs-b52efb9fafe39ea3370a4a30d046915666e9ad2c.zip |
(Man-next-section): Don't consider the last line of the page as being
part of any section.
Diffstat (limited to 'lisp/man.el')
-rw-r--r-- | lisp/man.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/man.el b/lisp/man.el index 0484c032e34..e74f9734e51 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -1296,7 +1296,9 @@ The following key bindings are currently in effect in the buffer: (forward-line 1)) (if (re-search-forward Man-heading-regexp (point-max) t n) (beginning-of-line) - (goto-char (point-max))))) + (goto-char (point-max)) + ;; The last line doesn't belong to any section. + (forward-line -1)))) (defun Man-previous-section (n) "Move point to Nth previous section (default 1)." |