(facemenu-add-face): Warn when font-lock is active.

diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index 18023511c206d9e697ce93be1c25a03917819723..43c275e4a2f4b5cc131e473a272b9e201824e3ab 100644 (file)
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -611,7 +611,9 @@ effect.  See `facemenu-remove-face-function'."
                                                  self-insert-face
                                                (list self-insert-face)))
                                 face)
-             self-insert-face-command this-command)))))
+             self-insert-face-command this-command))))
+  (unless (facemenu-enable-faces-p)
+    (message "Font-lock mode will override any faces you set in this buffer")))
 
 (defun facemenu-active-faces (face-list &optional frame)
   "Return from FACE-LIST those faces that would be used for display.