diff options
| author | Miles Bader <miles@gnu.org> | 2006-04-11 23:22:06 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2006-04-11 23:22:06 +0000 |
| commit | 14e6dc54f295e1fbc92f6e22a5bb8b5f9a4b83ac (patch) | |
| tree | 9eb6b17863e4092596065cfa81a56ad7b433a818 /lisp/gnus/gnus-sieve.el | |
| parent | 8a8f8697fe793055cf10c6081de7c5675151ed1e (diff) | |
| download | emacs-14e6dc54f295e1fbc92f6e22a5bb8b5f9a4b83ac.tar.gz | |
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
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))) |