Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-22 21:07:36 +00:00
Code Issues Projects Releases Packages 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
Show stats 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)