From c030d949978b3cdcf28b8b22a76a53f86af71def Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Wed, 13 Oct 2010 23:15:25 +0200 Subject: [PATCH] (nnimap-parse-flags): Fix regexp. --- lisp/ChangeLog | 1 + lisp/nnimap.el | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 912b76757..f7d30ea1b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,6 +1,7 @@ 2010-10-13 Lars Magne Ingebrigtsen * nnimap.el (nnimap-open-connection): Fix open-tls-stream call. + (nnimap-parse-flags): Fix regexp. * shr.el (shr-find-fill-point): Use a filling algorithm that should probably work for CJVK text, too. diff --git a/lisp/nnimap.el b/lisp/nnimap.el index 2faa2befc..5aca6f3c8 100644 --- a/lisp/nnimap.el +++ b/lisp/nnimap.el @@ -1289,7 +1289,7 @@ textual parts.") (setq start end)) (setq start (point)) (goto-char end)) - (while (re-search-forward "\n* [0-9]+ FETCH " start t) + (while (re-search-forward "^\\* [0-9]+ FETCH " start t) (setq elems (read (current-buffer))) (push (cons (cadr (memq 'UID elems)) (cadr (memq 'FLAGS elems))) -- 2.25.1