From: Lars Magne Ingebrigtsen Date: Mon, 30 May 2011 18:35:41 +0000 (+0200) Subject: Partially revert last regexp simplification, which was too simple. X-Git-Url: https://cgit.sxemacs.org/?a=commitdiff_plain;h=51f3b8b3c6ce34b42e1c7d10e08d6aa8cc0a1948;p=gnus Partially revert last regexp simplification, which was too simple. --- diff --git a/lisp/nnimap.el b/lisp/nnimap.el index e2953ff40..dc8b38b8f 100644 --- a/lisp/nnimap.el +++ b/lisp/nnimap.el @@ -190,7 +190,7 @@ textual parts.") (let (article bytes lines size string) (block nil (while (not (eobp)) - (while (not (looking-at "\\* [0-9]+ FETCH.+UID [0-9]+")) + (while (not (looking-at "\\* [0-9]+ FETCH.+UID \\([0-9]+\\)")) (delete-region (point) (progn (forward-line 1) (point))) (when (eobp) (return))) @@ -1904,7 +1904,7 @@ textual parts.") (let (article bytes) (block nil (while (not (eobp)) - (while (not (looking-at "\\* [0-9]+ FETCH.+UID [0-9]+")) + (while (not (looking-at "\\* [0-9]+ FETCH.+UID \\([0-9]+\\)")) (delete-region (point) (progn (forward-line 1) (point))) (when (eobp) (return)))