(tetris-score-file): Use temporary-file-directory

instead of a literal "/tmp".  Suggested by Robert
<robert@chezmarshall.freeserve.co.uk>.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index af5fab2cab136a3431de5862ded47375be135bfd..d80cbbd6317f026466d80e1103a9cdd1dcd4e697 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2001-09-29  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * play/snake.el (snake-score-file): Use temporary-file-directory
+       instead of a literal "/tmp".  Suggested by Robert
+       <robert@chezmarshall.freeserve.co.uk>.
+
+       * play/tetris.el (tetris-score-file): Ditto.
+
 2001-09-28  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * apropos.el (apropos-print): Make the directions inserted at the

diff --git a/lisp/play/tetris.el b/lisp/play/tetris.el
index f294676faf1d97032bb842b2b8206252073948da..37b544f19763025ca9a407ce0dcb0fe7257127d1 100644 (file)
--- a/lisp/play/tetris.el
+++ b/lisp/play/tetris.el
@@ -102,7 +102,7 @@ Element 0 is ignored.")
 (defvar tetris-score-y (+ tetris-next-y 6)
   "Y position of score.")
 
-(defvar tetris-score-file "/tmp/tetris-scores"
+(defvar tetris-score-file (concat temporary-file-directory "tetris-scores")
 ;; anybody with a well-connected server want to host this?
 ;(defvar tetris-score-file "/anonymous@ftp.pgt.com:/pub/cgw/tetris-scores"
   "File for holding high scores.")