Mercurial > emacs
changeset 4495:8e8321e76af5
(mh-read-msg-list): Undo previous change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 09 Aug 1993 00:08:55 +0000 |
| parents | 15b073a6c860 |
| children | c9b46e3fe749 |
| files | lisp/=mh-e.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/=mh-e.el Sun Aug 08 23:19:24 1993 +0000 +++ b/lisp/=mh-e.el Mon Aug 09 00:08:55 1993 +0000 @@ -48,7 +48,7 @@ ;;; Modified by James Larus, BBN, July 1984 and UCB, 1984 & 1985. ;;; Rewritten for GNU Emacs, James Larus 1985. larus@ginger.berkeley.edu ;;; Modified by Stephen Gildea 1988. gildea@bbn.com -(defconst mh-e-RCS-id "$Header: /home/fsf/rms/e19/lisp/RCS/mh-e.el,v 1.14 1993/07/17 00:18:04 rms Exp rms $") +(defconst mh-e-RCS-id "$Header: /home/fsf/rms/e19/lisp/RCS/mh-e.el,v 1.15 1993/07/20 04:35:00 rms Exp rms $") ;;; Code: @@ -2334,7 +2334,7 @@ (match-end 0)))) (cond ((looking-at "-") ; Message range (forward-char 1) - (re-search-forward " [0-9]+" end-of-line t) + (re-search-forward "[0-9]+" end-of-line t) (let ((num2 (string-to-int (buffer-substring (match-beginning 0) (match-end 0))))) (if (< num2 num)