Mercurial > emacs

diff lisp/gnus/gnus-sieve.el @ 69944:a87e26272828

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-210 Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 81-82) - Update from CVS
author Miles Bader <miles@gnu.org>
date Tue, 11 Apr 2006 23:22:06 +0000
parents 1077b8039c32
children e3694f1cb928
line wrap: on
line diff
--- a/lisp/gnus/gnus-sieve.el	Tue Apr 11 23:05:31 2006 +0000
+++ b/lisp/gnus/gnus-sieve.el	Tue Apr 11 23:22:06 2006 +0000
@@ -107,7 +107,7 @@
   (find-file gnus-sieve-file)
   (goto-char (point-min))
   (if (re-search-forward (regexp-quote gnus-sieve-region-start) nil t)
-      (delete-region (match-end 0)
+      (delete-region (match-beginning 0)
 		     (or (re-search-forward (regexp-quote
 					     gnus-sieve-region-end) nil t)
 			 (point)))