Mercurial > emacs
changeset 45297:7f069ec93484
(cua--rectangle-operation):
Don't highlight empty lines in rectangles.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Tue, 14 May 2002 21:10:34 +0000 |
| parents | eb7082dc04a0 |
| children | 539cd2d3c083 |
| files | lisp/emulation/cua-rect.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/cua-rect.el Tue May 14 20:30:55 2002 +0000 +++ b/lisp/emulation/cua-rect.el Tue May 14 21:10:34 2002 +0000 @@ -585,7 +585,8 @@ (if (car (cdr (cdr sel))) (setq v (null v)))) (if visible - (funcall fct p m l r v) + (unless (eolp) + (funcall fct p m l r v)) (if v (funcall fct p m l r))))) (set-marker m nil)