martin rudalics <rudalics@gmx.at> writes:

> I disregarded the useless complication that 'minibuffer-selected-window'
> returns nil when the selected window is not a minibuffer window.  Please
> try the below.
>
> martin
>
> (defun my-buffer-identification (fmt)
>   (list (propertize
>        fmt
>        'face (if (let ((window (selected-window)))
>                    (or (eq window (old-selected-window))
>                        (and (minibuffer-window-active-p (minibuffer-window))
>                             (with-selected-window (minibuffer-window)
>                               (eq window (minibuffer-selected-window))))))

Thanks; seems to work fine.  Perhaps we should make this into a utility
function and then document this technique in the manual in the mode line
section?

--
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no