🚀 go-pugleaf

Has anyone hacked Epoch to get a new screen every time Emacs needs a
new window, e.g. for a *help* buffer or a *compilation* buffer? The
idea is to finally end up with one *help*, *compilation*, ... screen
each, which I can iconify when I don't need them. 

I played around a bit with the *temp-buffer-show-hook* and it almost
worked. The code looks like this:

;;; warning: buggy code ahead!
(defun *help-buffer-other-screen* (help-buffer)
  "create a new screen for the help buffer if necessary"
  (interactive "B")
  (save-excursion
    (setq this-buffer (get-buffer (current-buffer)))
    (setq this-screen (get-screen (current-screen)))
    (setq help-screen-buffer (or help-buffer "*Help*"))
    (setq help-screen (find-buffer-other-screen help-screen-buffer))
    (switch-screen this-screen) ;; switch back to current buffer in general

    ;; exceptions:
    (if (equal help-screen-buffer " *Completions*") (other-window 1))
    (if (equal help-screen-buffer "*Help*")(switch-screen this-screen))))

(setq temp-buffer-show-hook '*help-buffer-other-screen*)
;;; end buggy code

But being a not-so-sophisticated Epoch 'n Elisp programmer I
run into trouble trouble when I made a Minibuffer completion while
putting together the argument for a 'describe-function. What happens
is that one wants the cursor to stay in the Minibuffer, not in the
*Completions* buffer or in the buffer you invoked 'describe-function
from. 

Ideas, Solutions?

-- Arne
-- 
Arne Frick, M.S.		phone: 0721/608-4762	fax: 0721/6622-968
Universitaet Karlsruhe		email: frick@ira.uka.de
Postfach 6980, 			       frick@karlsruhe.gmd.de
Vincenz-Priessnitz-Str. 1, W-7500 Karlsruhe 1, GERMANY