diff options
Diffstat (limited to 'lisp/gnus/gnus-sieve.el')
| -rw-r--r-- | lisp/gnus/gnus-sieve.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-sieve.el b/lisp/gnus/gnus-sieve.el index 99e8f6b4986..0e6c500d0f2 100644 --- a/lisp/gnus/gnus-sieve.el +++ b/lisp/gnus/gnus-sieve.el @@ -107,7 +107,7 @@ See the documentation for these variables and functions for details." (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))) |