all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* Conditional Mode Line Background
@ 2008-12-21  1:04 Florian Beck
  0 siblings, 0 replies; 2+ messages in thread
From: Florian Beck @ 2008-12-21  1:04 UTC (permalink / raw
  To: help-gnu-emacs


If you wanted to display the mode line of any window where
`window-dedicated-p' is set in, say, »light blue«, how would you do that? 
-- 

Florian Beck




^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: Conditional Mode Line Background
       [not found] <mailman.3183.1229821486.26697.help-gnu-emacs@gnu.org>
@ 2008-12-21 22:39 ` Andreas Politz
  0 siblings, 0 replies; 2+ messages in thread
From: Andreas Politz @ 2008-12-21 22:39 UTC (permalink / raw
  To: help-gnu-emacs

Florian Beck wrote:
> If you wanted to display the mode line of any window where
> `window-dedicated-p' is set in, say, »light blue«, how would you do that? 


(setq mode-line-format
       '(:eval (let ((ml (concat
			 (format-mode-line
			  (default-value 'mode-line-format))
			 "%-")))	;dashes seem to get lost
		(if (window-dedicated-p (selected-window))
		    (propertize ml 'face '(:background "blue"))
		  ml))))


I don't know how to detect (in)activeness, but would be interested to find
out.

-ap


^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2008-12-21 22:39 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2008-12-21  1:04 Conditional Mode Line Background Florian Beck
     [not found] <mailman.3183.1229821486.26697.help-gnu-emacs@gnu.org>
2008-12-21 22:39 ` Andreas Politz

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.