summaryrefslogtreecommitdiff
path: root/lisp/misc.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/misc.el')
-rw-r--r--lisp/misc.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/misc.el b/lisp/misc.el
index e4c54092a49..522ffef9cb7 100644
--- a/lisp/misc.el
+++ b/lisp/misc.el
@@ -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)))
@@ -62,7 +62,7 @@ The characters copied are inserted in the buffer before point."
;; Variation of `zap-to-char'.
(defun zap-up-to-char (arg char)
- "Kill up to, but not including ARG'th occurrence of CHAR.
+ "Kill up to, but not including ARGth occurrence of CHAR.
Case is ignored if `case-fold-search' is non-nil in the current buffer.
Goes backward if ARG is negative; error if CHAR not found.
Ignores CHAR at point."