From dee83199211b84efff5f5497abd16689096d47ec Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 28 Aug 1999 18:23:49 +0000 Subject: (ledit-zap-file, ledit-read-file, ledit-compile-file): Use temporary-file-directory. --- lisp/ledit.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'lisp/ledit.el') diff --git a/lisp/ledit.el b/lisp/ledit.el index 230dd9444e..a54e976cf8 100644 --- a/lisp/ledit.el +++ b/lisp/ledit.el @@ -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.") -- cgit v1.2.3