Commit a8bcc348 authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

(spaces-string): Simplify and add doc string.

parent 017e297e
2006-08-18 Gustav H,Ae(Bllberg <gustav@gmail.com> (tiny change)
* rect.el (spaces-string): Simplify and add doc string.
2006-08-17 Romain Francoise <romain@orebokech.com>
 
* progmodes/gdb-ui.el (gdb-edit-locals-value): Balance parens.
......
......@@ -181,12 +181,9 @@ the function is called."
;; this one is untouched --dv
(defun spaces-string (n)
"Returns a string with N spaces."
(if (<= n 8) (aref spaces-strings n)
(let ((val ""))
(while (> n 8)
(setq val (concat " " val)
n (- n 8)))
(concat val (aref spaces-strings n)))))
(make-string n ? )))
;;;###autoload
(defun delete-rectangle (start end &optional fill)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment