1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00

(run-at-time): Pass args to start-process in right order.

This commit is contained in:
Richard M. Stallman 1993-05-31 17:59:07 +00:00
parent 373377edfd
commit 43be9218ca

View File

@ -71,8 +71,9 @@ Relative times may be specified as a series of numbers followed by units:
(let ((process-connection-type nil))
;; Don't search the exec path for the timer program;
;; we know exactly which one we want.
(start-process (expand-file-name timer-program exec-directory)
nil "timer"))
(start-process "timer" nil
(expand-file-name timer-program
exec-directory)))
timer-alist nil)
(set-process-filter timer-process 'timer-process-filter)
(set-process-sentinel timer-process 'timer-process-sentinel)