Re: Printing documentation string of another function

[Heime]

On Thursday, April 11th, 2024 at 7:36 AM, Stephen Berman 
<stephen.berman@gmx.net> wrote:

> On Wed, 10 Apr 2024 17:17:00 +0000 Heime heimeborgia@protonmail.com wrote:
> 
> > With the following implementation, I cannot get the documentation string
> > of the appropriate function to display.
> > 
> > (defun avus-doc (seltr)
> > "Print the documentation string of a particular function."
> > 
> > (interactive
> > (list
> > (let ( (cseq '("Greek" "Flokki")) )
> > (completing-read "Doc: " cseq nil t "Greek"))))
> > 
> > (pcase seltr
> > ("Greek" (documentation 'avus-greek))
> > ("Flokki" (documentation 'avus-flokki))) )
> 
> 
> `(documentation 'avus-greek)' just returns the doc string, it does not
> display it. You have to add code to do that, e.g.:
> 
> (defun avus-doc (seltr)
> "Print the documentation string of a particular function."
> (interactive
> (list
> (let ((cseq '("Greek" "Flokki")))
> (completing-read "Doc: " cseq nil t "Greek"))))
> (let ((doc (pcase seltr
> ("Greek" (documentation 'avus-greek))
> ("Flokki" (documentation 'avus-flokki)))))
> (tooltip-show doc)))
> 
> Steve Berman

I want to print in the usual documentation buffer as doing 
C-h f avus-greek or C-h f avus-flokki