(copy-from-above-command): "?\ " -> "?\s".
authorJuanma Barranquero <lekktu@gmail.com>
Mon, 27 Nov 2006 14:00:11 +0000 (14:00 +0000)
committerJuanma Barranquero <lekktu@gmail.com>
Mon, 27 Nov 2006 14:00:11 +0000 (14:00 +0000)
lisp/misc.el

index e4c5409..a793283 100644 (file)
@@ -48,7 +48,7 @@ The characters copied are inserted in the buffer before point."
       (if (< cc (current-column))
          (if (= (preceding-char) ?\t)
              (progn
-               (setq string (make-string (min n (- (current-column) cc)) ?\ ))
+               (setq string (make-string (min n (- (current-column) cc)) ?\s))
                (setq n (- n (min n (- (current-column) cc)))))
            ;; In middle of ctl char => copy that whole char.
            (backward-char 1)))