changeset 71569:deb64e2d79af

* emulation/viper-init.el, calendar/calendar.el: * progmodes/make-mode.el: Delete calls to facemenu-unlisted-faces.
author Chong Yidong <cyd@stupidchicken.com>
date Mon, 03 Jul 2006 14:32:01 +0000
parents 8d6af1c1c365
children b2635dbb4aaf
files lisp/calendar/calendar.el lisp/emulation/viper-init.el lisp/progmodes/make-mode.el
diffstat 3 files changed, 0 insertions(+), 22 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/calendar.el	Mon Jul 03 14:31:35 2006 +0000
+++ b/lisp/calendar/calendar.el	Mon Jul 03 14:32:01 2006 +0000
@@ -213,12 +213,6 @@
 ;; backward-compatibility alias
 (put 'holiday-face 'face-alias 'holiday)
 
-(eval-after-load "facemenu"
-  '(progn
-     (add-to-list 'facemenu-unlisted-faces 'diary)
-     (add-to-list 'facemenu-unlisted-faces 'calendar-today)
-     (add-to-list 'facemenu-unlisted-faces 'holiday)))
-
 (defcustom diary-entry-marker
   (if (not (display-color-p))
       "+"
--- a/lisp/emulation/viper-init.el	Mon Jul 03 14:31:35 2006 +0000
+++ b/lisp/emulation/viper-init.el	Mon Jul 03 14:32:01 2006 +0000
@@ -854,11 +854,6 @@
 
 ;;; Face-saving tricks
 
-(defun viper-hide-face (face)
-  (if (and (viper-has-face-support-p) viper-emacs-p)
-      (add-to-list 'facemenu-unlisted-faces face)))
-
-
 (defgroup viper-highlighting nil
   "Hilighting of replace region, search pattern, minibuffer, etc."
   :prefix "viper-"
@@ -876,8 +871,6 @@
 DO NOT CHANGE this variable.  Instead, use the customization widget
 to customize the actual face object `viper-search'
 this variable represents.")
-(viper-hide-face viper-search-face)
-
 
 (defface viper-replace-overlay
   '((((class color)) (:foreground "Black" :background "darkseagreen2"))
@@ -890,8 +883,6 @@
 DO NOT CHANGE this variable.  Instead, use the customization widget
 to customize the actual face object `viper-replace-overlay'
 this variable represents.")
-(viper-hide-face viper-replace-overlay-face)
-
 
 (defface viper-minibuffer-emacs
   '((((class color)) (:foreground "Black" :background "darkseagreen2"))
@@ -904,8 +895,6 @@
 DO NOT CHANGE this variable.  Instead, use the customization widget
 to customize the actual face object `viper-minibuffer-emacs'
 this variable represents.")
-(viper-hide-face viper-minibuffer-emacs-face)
-
 
 (defface viper-minibuffer-insert
   '((((class color)) (:foreground "Black" :background "pink"))
@@ -918,8 +907,6 @@
 DO NOT CHANGE this variable.  Instead, use the customization widget
 to customize the actual face object `viper-minibuffer-insert'
 this variable represents.")
-(viper-hide-face viper-minibuffer-insert-face)
-
 
 (defface viper-minibuffer-vi
   '((((class color)) (:foreground "DarkGreen" :background "grey"))
@@ -932,7 +919,6 @@
 DO NOT CHANGE this variable.  Instead, use the customization widget
 to customize the actual face object `viper-minibuffer-vi'
 this variable represents.")
-(viper-hide-face viper-minibuffer-vi-face)
 
 ;; the current face to be used in the minibuffer
 (viper-deflocalvar
--- a/lisp/progmodes/make-mode.el	Mon Jul 03 14:31:35 2006 +0000
+++ b/lisp/progmodes/make-mode.el	Mon Jul 03 14:32:01 2006 +0000
@@ -306,8 +306,6 @@
   "\\(^\\..*\\)\\|\\(.*~$\\)\\|\\(.*,v$\\)\\|\\(\\.[chy]\\)"
   "Regex for filenames that will NOT be included in the target list.")
 
-(if (fboundp 'facemenu-unlisted-faces)
-    (add-to-list 'facemenu-unlisted-faces 'makefile-space))
 (defvar makefile-space 'makefile-space
   "Face to use for highlighting leading spaces in Font-Lock mode.")