mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-23 07:19:15 +00:00
(read-face-name): Format the prompt correctly when there's no default.
This commit is contained in:
parent
3fad47d896
commit
3b4ef34b2e
@ -1,3 +1,8 @@
|
||||
2002-04-27 Miles Bader <miles@gnu.org>
|
||||
|
||||
* faces.el (read-face-name): Format the prompt correctly when
|
||||
there's no default.
|
||||
|
||||
2002-04-26 Andrew Choi <akochoi@shaw.ca>
|
||||
|
||||
* term/mac-win.el: Don't call ediff-toggle-multiframe. Set
|
||||
|
@ -879,7 +879,7 @@ Otherwise, return a single face."
|
||||
(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 @@ Otherwise, return a single face."
|
||||
(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
|
||||
|
Loading…
Reference in New Issue
Block a user