Re: Display *Help* in a dedicated frame

Sent with Proton Mail secure email.

On Wednesday, April 1st, 2026 at 7:49 AM, Jean Louis <[email protected]> wrote:

> On 2026-03-31 22:09, Heime wrote:
> 
> > Although this function makes a new frame, the original frame still
> > gets split to show the *Help*, whereas the new frame stays empty.
> >
> > There are also the optional arguments in describe-symbol with some
> > funky stuff happening in there.
> >
> > (defun ksymbol (sbl)
> >   "Show the full documentation of symbol SBL in a frame."
> >
> >   (interactive
> >     (let ( (prompt (format "Describe Symbol [%s]: "
> >                      (or (symbol-name (symbol-at-point)) ""))) )
> >       (list (completing-read prompt obarray #'fboundp t nil nil
> >               (symbol-name (symbol-at-point))))))
> >
> >   (let* ( (rnm  "[RDU] Quick Reference Display Unit")
> > 	  (frm  (make-frame `((name . ,rnm) (minibuffer . nil))))
> > 	  (bfr  (generate-new-buffer "Describe Symbol"))
> >           (sym  (intern sbl)) )
> >     (set-window-buffer (frame-root-window frm) bfr)
> >     (with-current-buffer bfr
> >       (describe-symbol sym)
> >       (help-mode-setup-buttons bfr)
> >       (setq buffer-read-only t))
> >     (select-frame-set-input-focus frm)))
> >
> 
> (defun ksymbol (sbl)
>    "Show the full documentation of symbol SBL in a frame."
>    (interactive
>     (let ((prompt (format "Describe Symbol [%s]: "
>                           (or (symbol-name (symbol-at-point)) ""))))
>       (list (completing-read prompt obarray #'fboundp t nil nil
>                              (symbol-name (symbol-at-point))))))
> 
>    (let ((sym (intern sbl))
>          (display-buffer-overriding-action
>           '((display-buffer-pop-up-frame)
>             (pop-up-frames . t)
>             (name . "[RDU] Quick Reference Display Unit")
>             (minibuffer . nil))))
>      (describe-symbol sym)))

The original frame still gets split and the *Help* buffer displayed.