🚀 go-pugleaf

In article <8812301512.AA10827@decwrl.dec.com>, ellis@ultra.dec.com (David Ellis) writes:
> To have a GNU Emacs command prompt for string argument input using a fixed 
> prompt string, the command should include in its body the form
> 	(interactive "s(This is a prompt string) : ")
> 
> What I'd like to do is have a function taking an argument that gets
> inserted into a prompt string. [...]
> I can do this if I can get the special form "interactive" to take as its
> argument a string-valued expression in place of a specific string [...]
> 	(interactive (format "s(This is a %s prompt string) : " foo-arg))
> 
> Unfortunately, GNU Emacs rewards this effort with the error message
> 	Wrong type argument: listp, "s(This is a Type A prompt string) : "
> saying that "interactive" expects a list (huh?) but has been given a string.

The "interactive" function expects either a string or an s-exp to evaluate to
get a list of arguments to pass to the function.  From the documentation for
"interactive":

    The argument of  interactive  is usually a string containing a code letter
     followed by a prompt.  (Some code letters do not use I/O to get
     the argument and do not need prompts.)  To prompt for multiple arguments,
     give a code letter, its prompt, a newline, and another code letter, etc.
    If the argument is not a string, it is evaluated to get a list of
     arguments to pass to the function.

For your example, you should use:

    (interactive (list (read-string (format "s(This is a %s prompt string): " foo-arg))))

The argument to interactive is responsible for returning a list of arguments
for the function, NOT another interactive spec.  See docs for more info.

Note that foo-arg cannot be one of the arguments to the function since if
that function is called interactively, its arguments will not yet be defined.
In other words,

    (define foo (foo-arg)
       (interactive (list (read-string (format "s(This is a %s prompt string): " foo-arg))))      
       ...)

is meaningless and will give you a "Symbol's value as variable is void:
foo-arg" error (unless of course foo-arg is already defined in a larger
context outside foo).

-- Ashwin.