diff options
| author | Richard M. Stallman | 1994-02-09 05:48:11 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-02-09 05:48:11 +0000 |
| commit | d07482afc1736807b4e914dba011be2db7606cbb (patch) | |
| tree | d3cf358b2efaeab4eaba31c752826e78d7b90c32 | |
| parent | c7d7ed2771c270d51951ff97f2655abdb2aed932 (diff) | |
| download | emacs-d07482afc1736807b4e914dba011be2db7606cbb.tar.gz emacs-d07482afc1736807b4e914dba011be2db7606cbb.zip | |
(display-time): Use expand-file-name to make file name of wakeup.
| -rw-r--r-- | lisp/time.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/time.el b/lisp/time.el index bcd0ae445fc..3e61e78448d 100644 --- a/lisp/time.el +++ b/lisp/time.el | |||
| @@ -74,7 +74,7 @@ After each update, `display-time-hook' is run with `run-hooks'." | |||
| 74 | (setq display-time-string "") | 74 | (setq display-time-string "") |
| 75 | (setq display-time-process | 75 | (setq display-time-process |
| 76 | (start-process "display-time" nil | 76 | (start-process "display-time" nil |
| 77 | (concat exec-directory "wakeup") | 77 | (expand-file-name "wakeup" exec-directory) |
| 78 | (int-to-string display-time-interval))) | 78 | (int-to-string display-time-interval))) |
| 79 | (process-kill-without-query display-time-process) | 79 | (process-kill-without-query display-time-process) |
| 80 | (set-process-sentinel display-time-process 'display-time-sentinel) | 80 | (set-process-sentinel display-time-process 'display-time-sentinel) |