Index: emacs/lisp/emulation/cua-rect.el
diff -c emacs/lisp/emulation/cua-rect.el:1.18
emacs/lisp/emulation/cua-rect.el:1.19
*** emacs/lisp/emulation/cua-rect.el:1.18 Tue May 17 22:39:30 2005
--- emacs/lisp/emulation/cua-rect.el Mon Jun 6 13:19:15 2005
***************
*** 755,761 ****
(sit-for 0) ; make window top/bottom reliable
(cua--rectangle-operation nil t nil nil nil ; do not tabify
'(lambda (s e l r v)
! (let ((rface (if v 'cua-rectangle-face
'cua-rectangle-noselect-face))
overlay bs ms as)
(when (cua--rectangle-virtual-edges)
(let ((lb (line-beginning-position))
--- 755,761 ----
(sit-for 0) ; make window top/bottom reliable
(cua--rectangle-operation nil t nil nil nil ; do not tabify
'(lambda (s e l r v)
! (let ((rface (if v 'cua-rectangle 'cua-rectangle-noselect))
overlay bs ms as)
(when (cua--rectangle-virtual-edges)
(let ((lb (line-beginning-position))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
