(tmm-inactive, tmm-remove-inactive-mouse-face):

Rename `tmm-inactive-face' to `tmm-inactive'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6b778e51742c3d1e489cd270b14d72a9847ec3bc..6d6996b2f5479a3582c9f0a9cd068161a8865de1 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-06-06  Juri Linkov  <juri@jurta.org>
+
+       * tmm.el (tmm-inactive, tmm-remove-inactive-mouse-face):
+       Rename `tmm-inactive-face' to `tmm-inactive'.
+
 2005-06-06  Matt Hodges  <MPHodges@member.fsf.org>
 
        * iswitchb.el: Rename faces.

diff --git a/lisp/tmm.el b/lisp/tmm.el
index 73eb404b14c508fa4d3da2a794aca90c0deffe2b..aa47012c6427c4fcf1e26137bfe92084078afe6c 100644 (file)
--- a/lisp/tmm.el
+++ b/lisp/tmm.el
@@ -133,7 +133,7 @@ specify nil for this variable."
   :type '(choice integer (const nil))
   :group 'tmm)
 
-(defface tmm-inactive-face
+(defface tmm-inactive
   '((t :inherit shadow))
   "Face used for inactive menu items."
   :group 'tmm)
@@ -349,7 +349,7 @@ Stores a list of all the shortcuts in the free variable `tmm-short-cuts'."
         (setq next (next-single-char-property-change (point) 'mouse-face))
         (when (looking-at inactive-string)
           (remove-text-properties (point) next '(mouse-face))
-          (add-text-properties (point) next '(face tmm-inactive-face)))
+          (add-text-properties (point) next '(face tmm-inactive)))
         (goto-char next)))
     (set-buffer-modified-p nil)))