martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages 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)