From: ueno <ueno>
Date: Wed, 18 Aug 1999 08:13:51 +0000 (+0000)
Subject: (pop3-get-extended-response): Fix regexp.
X-Git-Tag: t-gnus-6_13_0-07~4
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=2db1cf19018f5e84cc73fd23ee0c4ce1ba861b44;p=elisp%2Fgnus.git-

(pop3-get-extended-response): Fix regexp.
---

diff --git a/lisp/pop3.el b/lisp/pop3.el
index 8a2bd52..4a188bd 100644
--- a/lisp/pop3.el
+++ b/lisp/pop3.el
@@ -532,7 +532,7 @@ where
   (let ((start pop3-read-point) end)
     (set-buffer (process-buffer process))
     (goto-char start)
-    (while (not (re-search-forward "\\.\r\n" nil t))
+    (while (not (re-search-forward "^\\.\r\n" nil t))
       (accept-process-output process 3)
       (goto-char start))
     (setq pop3-read-point (point-marker))