changeset 67407:bb2f67d4e710

(cua--rectangle-aux-replace): Fix indention of text on right side of replaced rectangle.
author Kim F. Storm <storm@cua.dk>
date Thu, 08 Dec 2005 22:52:50 +0000
parents e493ff9c436d
children 8d183984281e
files lisp/emulation/cua-rect.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/cua-rect.el	Thu Dec 08 22:52:16 2005 +0000
+++ b/lisp/emulation/cua-rect.el	Thu Dec 08 22:52:50 2005 +0000
@@ -1242,6 +1242,7 @@
 	       (setq z (cdr z)))
 	     (if cua--debug
 		 (print (list (current-column) cc) auxbuf))
+	     (just-one-space 0)
              (indent-to cc))))
       (if (> tr 0)
 	  (message "Warning:  Truncated %d row%s" tr (if (> tr 1) "s" "")))