Mercurial > emacs
changeset 25416:851241b72ec9
(ledit-zap-file, ledit-read-file, ledit-compile-file):
Use temporary-file-directory.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 28 Aug 1999 18:23:49 +0000 |
| parents | 862886e87cf5 |
| children | 28211e20b0e4 |
| files | lisp/ledit.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ledit.el Sat Aug 28 18:23:14 1999 +0000 +++ b/lisp/ledit.el Sat Aug 28 18:23:49 1999 +0000 @@ -33,12 +33,14 @@ (defvar ledit-mode-map nil) -(defconst ledit-zap-file (concat "/tmp/" (user-login-name) ".l1") +(defconst ledit-zap-file + (expand-file-name (concat (user-login-name) ".l1") temporary-file-directory) "File name for data sent to Lisp by Ledit.") -(defconst ledit-read-file (concat "/tmp/" (user-login-name) ".l2") +(defconst ledit-read-file + (expand-file-name (concat (user-login-name) ".l2") temporary-file-directory) "File name for data sent to Ledit by Lisp.") (defconst ledit-compile-file - (concat "/tmp/" (user-login-name) ".l4") + (expand-file-name (concat (user-login-name) ".l4") temporary-file-directory) "File name for data sent to Lisp compiler by Ledit.") (defconst ledit-buffer "*LEDIT*" "Name of buffer in which Ledit accumulates data to send to Lisp.")