Re: How to defun body in procedural manner

[Kiwon Um]

On Apr 17, 2:52 pm, thierry.volpia...@gmail.com wrote:
> Hi, i don't use cvs, but you should have a look at what return:
> `cvs-sentinel'.
> and:
> (when (cvs-sentinel ==> return_what_you_want)
>   (shell-command "your_command"))
>

I've tried to understand what the cvs-sentinel function does, but I
didn't. Would you write a concrete example code for me, please?

> Kiwon Um <um.ki...@gmail.com> writes:
> > Hello. I wrote a function as follows:
>
> > (defun my-update-package (path)
> >   "Update the package in path from CVS"
> >   (cvs-update path nil)
> >   (shell-command (concat "touch `find " path " -name Makefile`"))
> >   (compile (concat "make -C " path)))
>
> > When the function is called, it seems to execute the shell-command and
> > compile lines before the finishing cvs-update line. How can I make
> > this functional execution procedurally? Help me, please.
>
> > Thanks.
>
> --
> A + Thierry Volpiatto
> Location: Saint-Cyr-Sur-Mer - France