# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1019175788 0
# Node ID 37fdab0b94fa50da4395b30b04c6813f832d2190
# Parent  7b62d2ff93817e6bf98a97452a42b8764ac0ffde
(insert-rectangle): Use insert-for-yank.

diff -r 7b62d2ff9381 -r 37fdab0b94fa lisp/rect.el
--- a/lisp/rect.el	Fri Apr 19 00:18:22 2002 +0000
+++ b/lisp/rect.el	Fri Apr 19 00:23:08 2002 +0000
@@ -265,7 +265,7 @@
 	   (or (bolp) (insert ?\n))
 	   (move-to-column insertcolumn t)))
       (setq first nil)
-      (insert (car lines))
+      (insert-for-yank (car lines))
       (setq lines (cdr lines)))))
 
 ;;;###autoload