(custom-face-value-create): If face name doesn't end with "face", add

such here (similar to custom group widgets).

1 files changed, 3 insertions, 1 deletions

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index b9d05919572..3208dc9ddac 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -2619,7 +2619,9 @@ Match frames with dark backgrounds.")
            (if (eq custom-buffer-style 'face)
                (insert " ")
              (widget-specify-sample widget begin (point))
-             (insert ": "))
+             (if (string-match "face\\'" tag)
+                 (insert ":")
+               (insert " face: ")))
            ;; Sample.
            (push (widget-create-child-and-convert widget 'item
                                                   :format "(%{%t%})"