Re: foreground menu bug

[Richard M. Stallman]

    Or, it could just warn the user that the highlighting will not be
    visible since font lock is enabled?

It would be possible, but why be so complicated?
This change seems to do the right job.

*** facemenu.el 08 Mar 2005 22:24:04 -0500      1.77
--- facemenu.el 25 Jun 2005 18:19:29 -0400      
***************
*** 162,167 ****
--- 162,168 ----
    "Menu keymap for faces.")
  ;;;###autoload
  (defalias 'facemenu-face-menu facemenu-face-menu)
+ (put 'facemenu-face-menu 'menu-enable '(facemenu-enable-faces-p))
  
  ;;;###autoload
  (defvar facemenu-foreground-menu
***************
*** 171,176 ****
--- 172,178 ----
    "Menu keymap for foreground colors.")
  ;;;###autoload
  (defalias 'facemenu-foreground-menu facemenu-foreground-menu)
+ (put 'facemenu-foreground-menu 'menu-enable '(facemenu-enable-faces-p))
  
  ;;;###autoload
  (defvar facemenu-background-menu
***************
*** 180,185 ****
--- 182,192 ----
    "Menu keymap for background colors.")
  ;;;###autoload
  (defalias 'facemenu-background-menu facemenu-background-menu)
+ (put 'facemenu-background-menu 'menu-enable '(facemenu-enable-faces-p))
+ 
+ ;;; Condition for enabling menu items that set faces.
+ (defun facemenu-enable-faces-p ()
+   (not (and font-lock-mode font-lock-defaults)))
  
  ;;;###autoload
  (defvar facemenu-special-menu