aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJuanma Barranquero2006-11-27 14:00:11 +0000
committerJuanma Barranquero2006-11-27 14:00:11 +0000
commitff26cdfe3b9f37965d5c8ac75411f26388820dcc (patch)
treeb6fa66da8397f0b068cff2c62c6cee5a6a9981f1 /lisp
parent15e917e4f3a9dfefe4f4b44493b76c51afc1dcaf (diff)
downloademacs-ff26cdfe3b9f37965d5c8ac75411f26388820dcc.tar.gz
emacs-ff26cdfe3b9f37965d5c8ac75411f26388820dcc.zip
(copy-from-above-command): "?\ " -> "?\s".
Diffstat (limited to 'lisp')
-rw-r--r--lisp/misc.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/misc.el b/lisp/misc.el
index e4c54092a49..a79328343ae 100644
--- a/lisp/misc.el
+++ b/lisp/misc.el
@@ -48,7 +48,7 @@ The characters copied are inserted in the buffer before point."
48 (if (< cc (current-column)) 48 (if (< cc (current-column))
49 (if (= (preceding-char) ?\t) 49 (if (= (preceding-char) ?\t)
50 (progn 50 (progn
51 (setq string (make-string (min n (- (current-column) cc)) ?\ )) 51 (setq string (make-string (min n (- (current-column) cc)) ?\s))
52 (setq n (- n (min n (- (current-column) cc))))) 52 (setq n (- n (min n (- (current-column) cc)))))
53 ;; In middle of ctl char => copy that whole char. 53 ;; In middle of ctl char => copy that whole char.
54 (backward-char 1))) 54 (backward-char 1)))