all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* Re: master b96f441139: ; Delete file after wallpaper test
       [not found] ` <20221019142013.4C1ACC11D77@vcs2.savannah.gnu.org>
@ 2022-10-19 15:45   ` Stefan Monnier
  2022-10-19 18:57     ` Stefan Kangas
  0 siblings, 1 reply; 2+ messages in thread
From: Stefan Monnier @ 2022-10-19 15:45 UTC (permalink / raw)
  To: emacs-devel; +Cc: Stefan Kangas

> +        (setq process (wallpaper-set fil-jpg))
> +        ;; Wait for "touch" process to exit so temp file is removed.
> +        (while (and (< (- (time-convert nil 'integer) start)
> +                       timeout)
> +                    (process-live-p process))
> +          (sit-for 0.01))
>          (should called)))))

`accept-process-output` is supposed to be the more reliable.canonical way
to wait for a process to make progress or terminate.


        Stefan




^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: master b96f441139: ; Delete file after wallpaper test
  2022-10-19 15:45   ` master b96f441139: ; Delete file after wallpaper test Stefan Monnier
@ 2022-10-19 18:57     ` Stefan Kangas
  0 siblings, 0 replies; 2+ messages in thread
From: Stefan Kangas @ 2022-10-19 18:57 UTC (permalink / raw)
  To: Stefan Monnier, emacs-devel

Stefan Monnier <monnier@iro.umontreal.ca> writes:

>> +        (setq process (wallpaper-set fil-jpg))
>> +        ;; Wait for "touch" process to exit so temp file is removed.
>> +        (while (and (< (- (time-convert nil 'integer) start)
>> +                       timeout)
>> +                    (process-live-p process))
>> +          (sit-for 0.01))
>>          (should called)))))
>
> `accept-process-output` is supposed to be the more reliable.canonical way
> to wait for a process to make progress or terminate.

Thanks, I changed it to use `accept-process-output'.



^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2022-10-19 18:57 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
     [not found] <166618921100.528.6931883283500001470@vcs2.savannah.gnu.org>
     [not found] ` <20221019142013.4C1ACC11D77@vcs2.savannah.gnu.org>
2022-10-19 15:45   ` master b96f441139: ; Delete file after wallpaper test Stefan Monnier
2022-10-19 18:57     ` Stefan Kangas

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.