Re: header-line-format hacking

[Stefan Monnier <monnier@iro.umontreal.ca>]

> One minor mode attempts to display the current 'class' that point is in --
> similar to what which-function-mode does for functions [1].  On my system,
> there doesn't seem to be enough space to display this in the mode line --
> especially when which-function-mode is active.

Hmm... I've used the <package>.<module>.<function> format in SML (by setting
which-func-functions) without any problem of mode-line space.  But yes,
mode-line space can be hard to come by, especially if you have lots of
minor modes.

> Needless to say, I'd like to use both of these modes at the same time --
> which is what prompted my question.

I think you'll have to do it all by hand.  Something like

  (define-minor-mode my-foo-mode
    "haha"
    (cond
     (my-foo-mode
      (unless header-line-format (setq header-line-format '("")))
      (add-to-list 'header-line-format 'my-foo-format 'append))
     (t
      (setq header-line-format (delq 'my-foo-format header-line-format))
      (if (equal header-line-format '("")) (setq header-line-format nil)))))


-- Stefan