mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-22 16:01:04 -08:00
Code Issues Projects Releases Wiki Activity

(rmail-summary-goto-msg): Simply the regexp

Browse source 
for finding the message number.  Check that a non-digit follows it.
This commit is contained in:
Richard M. Stallman 1994-09-22 06:55:11 +00:00
parent 6696af6580
commit 4dc7e43ba1
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mail/rmailsum.el
View file

@ -807,7 +807,7 @@ Commands for sorting the summary:
(goto-char (point-max))
(rmail-summary-goto-msg)))
(goto-char (point-min))
(if (not (re-search-forward (concat "^ *" (int-to-string n)) nil t))
(if (not (re-search-forward (format "^%4d[^0-9]" n) nil t))
(progn (or nowarn (message "Message %d not found" n))
(setq n curmsg)
(setq message-not-found t)