[Emacs-diffs] emacs-25 ca87b34: ; Fix errant revert ccb75d7

[Mark Oteiza]

branch: emacs-25
commit ca87b349af02cf6761da576ae892d77d167d863e
Author: Mark Oteiza <address@hidden>
Commit: Mark Oteiza <address@hidden>

    ; Fix errant revert ccb75d7
    
    * lisp/rect.el (rectangle--highlight-for-redisplay): Use region face.
---
 lisp/rect.el |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/rect.el b/lisp/rect.el
index e9a4f45..6aa7b8b 100644
--- a/lisp/rect.el
+++ b/lisp/rect.el
@@ -815,7 +815,7 @@ Ignores `line-move-visual'."
                      (overlay-put ol 'after-string nil)))
                 ((< mright rightcol)    ;`rightcol' is past EOL.
                  (let ((str (rectangle--space-to rightcol)))
-                   (put-text-property 0 (length str) 'face 'rectangle-preview 
str)
+                   (put-text-property 0 (length str) 'face 'region str)
                    ;; If cursor happens to be here, draw it at the right place.
                    (rectangle--place-cursor leftcol left str)
                    (overlay-put ol 'after-string str)))
@@ -827,7 +827,7 @@ Ignores `line-move-visual'."
                      (overlay-put ol 'after-string nil)
                    (goto-char right)
                    (let ((str (rectangle--space-to rightcol)))
-                     (put-text-property 0 (length str) 'face 
'rectangle-preview str)
+                     (put-text-property 0 (length str) 'face 'region str)
                      (when (= left right)
                        (rectangle--place-cursor leftcol left str))
                      (overlay-put ol 'after-string str))))
@@ -837,7 +837,7 @@ Ignores `line-move-visual'."
                  ;; Make zero-width rectangles visible!
                  (overlay-put ol 'after-string
                               (concat (propertize " "
-                                                  'face '(rectangle-preview 
(:height 0.2)))
+                                                  'face '(region (:height 
0.2)))
                                       (overlay-get ol 'after-string))))
                (push ol nrol)))
            start end))