diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-07-20 04:35:00 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-07-20 04:35:00 +0000 |
| commit | 963a336b85dc4df8eabbe9bdb0ee116fcf1e3758 (patch) | |
| tree | f4eb1fcc9ea103e387158cf891c50159378b9483 /lisp | |
| parent | 69eeb53703345a9816f51277d64514dba02e0105 (diff) | |
| download | emacs-963a336b85dc4df8eabbe9bdb0ee116fcf1e3758.tar.gz | |
(mh-read-msg-list): Add space to message-number regexp.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/=mh-e.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/=mh-e.el b/lisp/=mh-e.el index a1131424c3d..5a5cd4d2be2 100644 --- a/lisp/=mh-e.el +++ b/lisp/=mh-e.el @@ -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.13 1993/06/20 22:45:13 rms Exp rms $") +(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 $") ;;; Code: @@ -2334,7 +2334,7 @@ Use \\[kill-buffer] if you don't want to delete the draft message file." (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) |