el/dot-emacs.el: Restore mode lines to tag-browser windows.

[profile] / el / dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 4c2af20..3ea5cd5 100644 (file)
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -3892,6 +3892,13 @@ there is sadness."
   (beginning-of-line)
   (forward-line (- arg)))
 
+(defun mdw-mpc-hack-tagbrowsers ()
+  (setq-local mode-line-format
+             '("%e"
+               mode-line-frame-identification
+               mode-line-buffer-identification)))
+(add-hook 'mpc-tagbrowser-mode-hook 'mdw-mpc-hack-tagbrowsers)
+
 (eval-after-load "mpc"
   '(progn
      (define-key mpc-mode-map "m" 'mdw-mpc-select)