Faces for Mode Line and Mode Line Inactive

Faces for Mode Line and Mode Line Inactive

[Lennart Borgman]

I get a bit frustrated when I look at the face customization pages for Mode
Line and Mode Line Inactive. Mode Line Inactive inherits from Mode Line and
it sets no attributes on its own as far as I can see. Still it looks
different (lighter on my display).

There seems to be a piece missing, or is it supposed to be this way?

- Lennart

Re: Faces for Mode Line and Mode Line Inactive

[Eli Zaretskii]

> From: "Lennart Borgman" <lennart.borgman.073@student.lu.se>
> Date: Sun, 5 Dec 2004 01:06:38 +0100
> 
> I get a bit frustrated when I look at the face customization pages for Mode
> Line and Mode Line Inactive. Mode Line Inactive inherits from Mode Line and
> it sets no attributes on its own as far as I can see. Still it looks
> different (lighter on my display).

??? Look at faces.el, around line 1780, where these two faces are
defined: mode-line-inactive inherits from mode-line only for terminals
that don't support colors and/or :style attributes.  Otherwise,
mode-line defines different colors and a released-button style.

Am I missing something?

Re: Faces for Mode Line and Mode Line Inactive

[Lennart Borgman]

----- Original Message ----- 
From: "Eli Zaretskii" <eliz@gnu.org>


> > From: "Lennart Borgman" <lennart.borgman.073@student.lu.se>
> > Date: Sun, 5 Dec 2004 01:06:38 +0100
> >
> > I get a bit frustrated when I look at the face customization pages for
Mode
> > Line and Mode Line Inactive. Mode Line Inactive inherits from Mode Line
and
> > it sets no attributes on its own as far as I can see. Still it looks
> > different (lighter on my display).
>
> ??? Look at faces.el, around line 1780, where these two faces are
> defined: mode-line-inactive inherits from mode-line only for terminals
> that don't support colors and/or :style attributes.  Otherwise,
> mode-line defines different colors and a released-button style.
>
> Am I missing something?

I don't know if you are missing or I am misunderstanding. I was looking at
the customization page for Mode Line Inactive face. There are no attributes
checked except for Inherit and it inherits from Mode Line on this page. So
to me it looks like the faces should be the same. (But as you wrote the
deffaces in faces.el are different.)

- Lennart

Re: Faces for Mode Line and Mode Line Inactive

[John Paul Wallington]

> I get a bit frustrated when I look at the face customization pages for Mode
> Line and Mode Line Inactive. Mode Line Inactive inherits from Mode Line and
> it sets no attributes on its own as far as I can see. Still it looks
> different (lighter on my display).
> 
> There seems to be a piece missing, or is it supposed to be this way?

I confirm that for me M-x customize-face mode-line-inactive says that
the face just inherits from mode-line despite it having a different
appearance.

I'm confused where the problem is, but don't have time to look at this
properly.  However, I noticed that M-x customize-face
modeline-inactive (its alias) does show the differing specs.

Also, it appears that this patch (moving the default case to be the
last case) causes M-x customize-face mode-line-inactive to show the
differing specs too:

Index: faces.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/faces.el,v
retrieving revision 1.293
diff -u -r1.293 faces.el
--- faces.el	2 Dec 2004 10:56:05 -0000	1.293
+++ faces.el	5 Dec 2004 22:21:30 -0000
@@ -1786,16 +1786,16 @@
   :group 'basic-faces)
 
 (defface mode-line-inactive
-  '((t
-     :inherit mode-line)
-    (((type x w32 mac) (background light) (class color))
+  '((((type x w32 mac) (background light) (class color))
      :weight light
      :box (:line-width -1 :color "grey75" :style nil)
      :foreground "grey20" :background "grey90")
     (((type x w32 mac) (background dark) (class color))
      :weight light
      :box (:line-width -1 :color "grey40" :style nil)
-     :foreground "grey80" :background "grey30"))
+     :foreground "grey80" :background "grey30")
+    (t
+     :inherit mode-line))
   "Basic mode line face for non-selected windows."
   :version "21.4"
   :group 'modeline

Re: Faces for Mode Line and Mode Line Inactive

[Stefan Monnier]

>>>>> "Lennart" == Lennart Borgman <lennart.borgman.073@student.lu.se> writes:

> ----- Original Message ----- 
> From: "Eli Zaretskii" <eliz@gnu.org>


>> > From: "Lennart Borgman" <lennart.borgman.073@student.lu.se>
>> > Date: Sun, 5 Dec 2004 01:06:38 +0100
>> >
>> > I get a bit frustrated when I look at the face customization pages for
> Mode
>> > Line and Mode Line Inactive. Mode Line Inactive inherits from Mode Line
> and
>> > it sets no attributes on its own as far as I can see. Still it looks
>> > different (lighter on my display).
>> 
>> ??? Look at faces.el, around line 1780, where these two faces are
>> defined: mode-line-inactive inherits from mode-line only for terminals
>> that don't support colors and/or :style attributes.  Otherwise,
>> mode-line defines different colors and a released-button style.
>> 
>> Am I missing something?

> I don't know if you are missing or I am misunderstanding. I was looking at
> the customization page for Mode Line Inactive face. There are no attributes
> checked except for Inherit and it inherits from Mode Line on this page. So
> to me it looks like the faces should be the same. (But as you wrote the
> deffaces in faces.el are different.)

The code I see in faces.el is appended.  It says that the face
unconditionally inherits from mode-line.  This is how it should be, AFAIK.


        Stefan


(defface mode-line-inactive
  '((t
     :inherit mode-line)
    (((type x w32 mac) (background light) (class color))
     :weight light
     :box (:line-width -1 :color "grey75" :style nil)
     :foreground "grey20" :background "grey90")
    (((type x w32 mac) (background dark) (class color))
     :weight light
     :box (:line-width -1 :color "grey40" :style nil)
     :foreground "grey80" :background "grey30"))
  "Basic mode line face for non-selected windows."
  :version "21.4"
  :group 'modeline
  :group 'basic-faces)

Re: Faces for Mode Line and Mode Line Inactive

[Stefan Monnier]

> Index: faces.el
> ===================================================================
> RCS file: /cvsroot/emacs/emacs/lisp/faces.el,v
> retrieving revision 1.293
> diff -u -r1.293 faces.el
> --- faces.el	2 Dec 2004 10:56:05 -0000	1.293
> +++ faces.el	5 Dec 2004 22:21:30 -0000
> @@ -1786,16 +1786,16 @@
>    :group 'basic-faces)
 
>  (defface mode-line-inactive
> -  '((t
> -     :inherit mode-line)
> -    (((type x w32 mac) (background light) (class color))
> +  '((((type x w32 mac) (background light) (class color))
>       :weight light
>       :box (:line-width -1 :color "grey75" :style nil)
>       :foreground "grey20" :background "grey90")
>      (((type x w32 mac) (background dark) (class color))
>       :weight light
>       :box (:line-width -1 :color "grey40" :style nil)
> -     :foreground "grey80" :background "grey30"))
> +     :foreground "grey80" :background "grey30")
> +    (t
> +     :inherit mode-line))
>    "Basic mode line face for non-selected windows."
>    :version "21.4"
>    :group 'modeline

Please read the NEWS file.  You'll discover that the above patch changes
the behavior.  The current code unconditionally inherits from mode-line
whereas your change make it inherit only for things like ttys or
b&w displays.


        Stefan

Re: Faces for Mode Line and Mode Line Inactive

[Richard Stallman]

    ??? Look at faces.el, around line 1780, where these two faces are
    defined: mode-line-inactive inherits from mode-line only for terminals
    that don't support colors and/or :style attributes.  Otherwise,
    mode-line defines different colors and a released-button style.

I tried this under X, and found that it was as Lennart said:
mode-line-inactive inherits from mode-line and specifies no changes.

So I tried changing the defface of mode-line-inactive, putting
the t clause to the end.  Then customize-face showed the proper
values.

Maybe customize-face is not handling the choice of clause the same way
that defface does.  face-spec-choose seems to put the t attributes at
the end after the more specific attributes.  The result is that the t
attributes don't entirely override everything if they come first.

I get the impression that face-spec-choose is trying to avoid dependence
on the order of the alternatives, but not entirely succeeding.

For customize-face, it looks like the function that handles this is
custom-filter-face-spec.  I don't understand it, but I suspect it
disagrees with what face-spec-choose does.

Re: Faces for Mode Line and Mode Line Inactive

[Dan Nicolaescu]

Stefan Monnier <monnier@iro.umontreal.ca> writes:

  > The code I see in faces.el is appended.  It says that the face
  > unconditionally inherits from mode-line.  This is how it should be, AFAIK.

[snip]
Not completely related to this discussion, but related to faces.el:
Shouldn't the mode-line and mode-line-inactive deffaces use
min-colors? (I somehow missed them when converting the other standard
deffaces to use min-colors).

May I check in this patch? 

*** faces.el	06 Dec 2004 07:51:19 -0800	1.293
--- faces.el	06 Dec 2004 10:37:26 -0800	
***************
*** 1775,1781 ****
  
  
  (defface mode-line
!   '((((type x w32 mac) (class color))
       :box (:line-width -1 :style released-button)
       :background "grey75" :foreground "black")
      (t
--- 1775,1781 ----
  
  
  (defface mode-line
!   '((((class color) (min-colors 88))
       :box (:line-width -1 :style released-button)
       :background "grey75" :foreground "black")
      (t
***************
*** 1788,1798 ****
  (defface mode-line-inactive
    '((t
       :inherit mode-line)
!     (((type x w32 mac) (background light) (class color))
       :weight light
       :box (:line-width -1 :color "grey75" :style nil)
       :foreground "grey20" :background "grey90")
!     (((type x w32 mac) (background dark) (class color))
       :weight light
       :box (:line-width -1 :color "grey40" :style nil)
       :foreground "grey80" :background "grey30"))
--- 1788,1798 ----
  (defface mode-line-inactive
    '((t
       :inherit mode-line)
!     (((background light) (class color) (min-colors 88))
       :weight light
       :box (:line-width -1 :color "grey75" :style nil)
       :foreground "grey20" :background "grey90")
!     (((background dark) (class color) (min-colors 88))
       :weight light
       :box (:line-width -1 :color "grey40" :style nil)
       :foreground "grey80" :background "grey30"))