Re: passing commands to ediff-directories from the elisp function

[Kevin Rodgers]

mak kwak wrote:
> I trying to write a method that will run ediff-directories comand for
> my two directories, then will mark all equal files for hiding (=h) and
> will hide them (x).
>
> I did the following:
> (defun compare-my-dirs (dir1 dir2)
> "compares two directories"
> (ediff-directories dir1 dir2)
> (switch-to-buffer "*Ediff Session Group Panel*") ;; success, switches 
to that buffer.
> (insert "=h") ;; !!!! neither does not mark equal files for hiding..
> (insert "x")) ;; !!!! ..nor hides them.
>
> My question is, how can I pass my commands to *`Ediff Session Group
> Panel*' from elisp function ?

(setq unread-command-events (list ?= ?h ?x))

--
Kevin Rodgers