Re: Buttons in help buffer that displays contents of variables

[Heime]

------- Original Message -------
On Sunday, July 23rd, 2023 at 8:14 AM, Stephen Berman <stephen.berman@gmx.net> 
wrote:


> On Sat, 22 Jul 2023 19:18:03 +0000 Heime heimeborgia@protonmail.com wrote:
> 
> > ------- Original Message -------
> > On Sunday, July 23rd, 2023 at 2:40 AM, Heime heimeborgia@protonmail.com 
> > wrote:
> > 
> > > I want to use a button to display the contents of a variable inside
> > > a help buffer, but the following gives
> > > 
> > > (wrong-number-of-arguments ((t) nil "Function to be executed when the 
> > > button
> > > is clicked..." (interactive) (message "Button clicked!")) 1)
> > > my-action(#<overlay from 1 to 8 in Help>)
> > 
> > Why does pressing the button give me such error ?
> > 
> > > (defconst myvar "Text of Front A")
> > > 
> > > (defun my-action ()
> > > "Function to be executed when the button is clicked."
> > > (interactive)
> > > (message "%s" myvar))
> > > 
> > > (defun qrh ()
> > > "Some description."
> > > 
> > > (interactive)
> > > 
> > > (with-help-window (help-buffer)
> > > (insert-button "Front A" 'action 'my-action 'follow-link t)))
> 
> 
> The error says the function my-action expects one argument, but you
> defined it with an empty argument list. If you don't want to use the
> argument, you can use `' as a placeholder for the required argument,
> which will be ignored by the byte compiler:
> 
> (defun my-action ()
> "Function to be executed when the button is clicked."
> (interactive)
> (message "%s" myvar))
> 
> Steve Berman

I do not understand the reason it expects an argument.  Would there be
a more suitable way to print some text after pressing the button ?