diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0381005285a5a1bad3308e53729916146032d5fa..dea0810ed7f4fca01f6d59fa1761303ff7b1fb03 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-08-25 John Paul Wallington + + * man.el (Man-default-man-entry): Don't whizz past the section + number before looking for it. + 2003-08-24 Nick Roberts * progmodes/gud.el (gud-display-line): Don't set window-point if diff --git a/lisp/man.el b/lisp/man.el index a3085e41501e673e43aafde8f6a3631993590b41..1de5fe8384463775c5788b6d0ad4316342dc5957 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -574,7 +574,6 @@ This guess is based on the text surrounding the cursor." (setq word (substring word 0 (match-beginning 0)))) ;; If looking at something like ioctl(2) or brc(1M), include the ;; section number in the returned value. Remove text properties. - (forward-word 1) (concat word (if (looking-at (concat "[ \t]*([ \t]*\\(" Man-section-regexp "\\)[ \t]*)"))