Mercurial > emacs

changeset 44896:fc1fdc78c3eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(read-face-name): Format the prompt correctly when there's no default.
author Miles Bader <miles@gnu.org>
date Sat, 27 Apr 2002 04:56:49 +0000
parents 38d4beae98c8
children 6388cc2baa1f
files lisp/faces.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Sat Apr 27 03:50:12 2002 +0000
+++ b/lisp/faces.el	Sat Apr 27 04:56:49 2002 +0000
@@ -879,7 +879,7 @@
 		 (format "%s (default %s): " prompt
 			 (if faces (mapconcat 'symbol-name faces ", ")
 			   string-describing-default))
-	       prompt)
+	       (format "%s: " prompt))
 	     obarray 'custom-facep t))
 	   ;; Canonicalize the output.
 	   (output
@@ -894,8 +894,6 @@
 	(car output)))))
 
 
-
-
 (defun face-valid-attribute-values (attribute &optional frame)
   "Return valid values for face attribute ATTRIBUTE.
 The optional argument FRAME is used to determine available fonts