From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 28 Aug 1999 18:24:28 +0000 (+0000)
Subject: (te-terminfo-directory): Use temporary-file-directory.
X-Git-Tag: emacs-pretest-21.0.90~7024
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0492dd4a868e7a0494d7cd09abfbc27d959ac645;p=emacs.git

(te-terminfo-directory): Use temporary-file-directory.
---

diff --git a/lisp/terminal.el b/lisp/terminal.el
index 275884cade6..e96bad98c86 100644
--- a/lisp/terminal.el
+++ b/lisp/terminal.el
@@ -187,7 +187,9 @@ performance."
 ;; Required to support terminfo systems
 (defconst te-terminal-name-prefix "emacs-em"
   "Prefix used for terminal type names for Terminfo.")
-(defconst te-terminfo-directory "/tmp/emacs-terminfo/"
+(defconst te-terminfo-directory
+  (file-name-as-directory
+   (expand-file-name "emacs-terminfo" temporary-file-directory))
   "Directory used for run-time terminal definition files for Terminfo.")
 (defvar te-terminal-name nil)