diff options
author | Kim F. Storm <storm@cua.dk> | 2005-06-06 13:19:15 +0000 |
---|---|---|
committer | Kim F. Storm <storm@cua.dk> | 2005-06-06 13:19:15 +0000 |
commit | 1e98d199cc4865bd1a508214f5d15007f85b254f (patch) | |
tree | 3068d3e3bdd375d690d2570be95fb539b35f17a4 /lisp/emulation/cua-rect.el | |
parent | c7b96d765214ce3b7176f513fc7fe4f8485945d7 (diff) | |
download | emacs-1e98d199cc4865bd1a508214f5d15007f85b254f.tar.gz emacs-1e98d199cc4865bd1a508214f5d15007f85b254f.tar.bz2 emacs-1e98d199cc4865bd1a508214f5d15007f85b254f.zip |
* emulation/cua-base.el (cua-rectangle, cua-rectangle-noselect)
(cua-global-mark): Remove -face suffix from face names.
* emulation/cua-gmrk.el (cua--init-global-mark): Remove
cua-global-mark face setup.
Diffstat (limited to 'lisp/emulation/cua-rect.el')
-rw-r--r-- | lisp/emulation/cua-rect.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el index 932448079dd..72fd9195850 100644 --- a/lisp/emulation/cua-rect.el +++ b/lisp/emulation/cua-rect.el @@ -755,7 +755,7 @@ If command is repeated at same position, delete the rectangle." (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)) + (let ((rface (if v 'cua-rectangle 'cua-rectangle-noselect)) overlay bs ms as) (when (cua--rectangle-virtual-edges) (let ((lb (line-beginning-position)) |