---
 lisp/cus-face.el |    6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

--- lisp/cus-face.el
+++ lisp/cus-face.el	2015-07-10 10:52:20.177518702 +0000
@@ -42,6 +42,9 @@
 (eval-when-compile
   (require 'font))
 
+;; Simply to apply any custom faces
+(autoload 'initialize-custom-faces "faces")
+
 ;;; Declaring a face.
 
 ;;;###autoload
@@ -336,7 +339,8 @@ and non-nil, FACE will also be created a
 COMMENT is a string comment about FACE.
 
 See `defface' for the format of SPEC."
-  (apply #'custom-theme-set-faces 'user args))
+  (apply #'custom-theme-set-faces 'user args)
+  (initialize-custom-faces))
 
 ;;;###autoload
 (defun custom-theme-set-faces (theme &rest args)