pestctrl/emacs
1
0
Fork 0
forked from Github/emacs
Code Issues Pull requests Projects Releases Packages Wiki Activity

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

Browse source
This commit is contained in:
Eli Zaretskii 2006-08-18 12:07:38 +00:00
parent 017e297ea9
commit a8bcc348b1
2 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
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.

7
lisp/rect.el
View file

@ -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)