summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2005-11-17 07:20:51 +0000
committerJuri Linkov <juri@jurta.org>2005-11-17 07:20:51 +0000
commitd69ab4ba1fd07e090e854f34623743362bf4ed18 (patch)
tree3791bbeca6dfa2f8c1aba9339aa2066aa5c1ce5c /lisp
parentad1b570140aae57141bdf03e3e81e890160cf588 (diff)
downloademacs-d69ab4ba1fd07e090e854f34623743362bf4ed18.tar.gz
(face-read-string): Set the default value arg of completing-read.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/faces.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index bcbda67b87b..85d8e882f22 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1019,7 +1019,7 @@ Value is the new attribute value."
(format "%s for face `%s' (default %s): "
name face default)
(format "%s for face `%s': " name face))
- completion-alist)))
+ completion-alist nil nil nil nil default)))
(if (equal value "") default value)))