Mercurial > emacs

diff lisp/gnus/sieve-manage.el @ 98286:30636ed66b80

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from gnus--devo--0 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1424
author Miles Bader <miles@gnu.org>
date Sun, 21 Sep 2008 04:22:42 +0000
parents a30459da1bd7
children a9dc0e7c3f2b
line wrap: on
line diff
--- a/lisp/gnus/sieve-manage.el	Sat Sep 20 23:37:47 2008 +0000
+++ b/lisp/gnus/sieve-manage.el	Sun Sep 21 04:22:42 2008 +0000
@@ -647,7 +647,7 @@
 	 (prog1
 	     (match-string 1)
 	   (goto-char (match-end 0))))
-	((looking-at (concat "{\\([0-9]+\\)}" sieve-manage-server-eol))
+	((looking-at (concat "{\\([0-9]+\\+?\\)}" sieve-manage-server-eol))
 	 (let ((pos (match-end 0))
 	       (len (string-to-number (match-string 1))))
 	   (if (< (point-max) (+ pos len))