How send answer to question a function asks automatically?

How send answer to question a function asks automatically?

[Christian Seberino]

I want to create a function that calls (server-edit) for me and avoids asking
me if I want to save the file because it defaults to YES!

   (defun cs-server-edit() (interactive)
      (server-edit "y"))
 
I've seen this work on other functions but you can't seem to be able to
add the string next to the function call with server-edit.

Any help would be greatly appreciated.

Sincerely,

Chris

Re: How send answer to question a function asks automatically?

[Kevin Rodgers]

Christian Seberino wrote:

> I want to create a function that calls (server-edit) for me and avoids asking
> me if I want to save the file because it defaults to YES!
> 
>    (defun cs-server-edit() (interactive)
>       (server-edit "y"))
>  
> I've seen this work on other functions but you can't seem to be able to
> add the string next to the function call with server-edit.

You have to read the source, to understand what arguments the function accepts.

Try this:

(defun cs-server-edit()
   (interactive)
   (let ((unread-command-events (cons ?y unread-command-events)))
     (server-edit)))

-- 
Kevin Rodgers