From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 25 Jan 1999 16:41:04 +0000 (+0000)
Subject: (list-faces-display): Multiline case of previous fix.
X-Git-Tag: emacs-20.4~775
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ed584298dfd73d86b7463fb65f09b7c1127539f2;p=emacs.git

(list-faces-display): Multiline case of previous fix.
---

diff --git a/lisp/faces.el b/lisp/faces.el
index 5e713c25cf7..4c938f2e1ba 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1148,7 +1148,7 @@ selected frame."
 	    (goto-char beg)
 	    (forward-line 1)
 	    (while (not (eobp))
-	      (insert "                          ")
+	      (insert-char ?  (1+ face-name-max-length))
 	      (forward-line 1))))
 	(goto-char (point-min)))
       (print-help-return-message))