diff options
Diffstat (limited to 'lisp/emulation/cua-rect.el')
| -rw-r--r-- | lisp/emulation/cua-rect.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el index f809aa9f57c..df9f7469707 100644 --- a/lisp/emulation/cua-rect.el +++ b/lisp/emulation/cua-rect.el @@ -1198,8 +1198,7 @@ The numbers are formatted according to the FORMAT string." (- (cua--rectangle-right) (cua--rectangle-left) -1))) (r (or setup-fct (cua--extract-rectangle))) y z (tr 0)) - (save-excursion - (set-buffer auxbuf) + (with-current-buffer auxbuf (erase-buffer) (if setup-fct (funcall setup-fct) |