# HG changeset patch
# User Morten Welinder <terra@diku.dk>
# Date 782552874 0
# Node ID a94dba376d9a8f67b98c3d4835f3573c3304440f
# Parent  cf97e75d8e026da4c3714a00e77d74a9188c000c
*** empty log message ***

diff -r cf97e75d8e02 -r a94dba376d9a lisp/emerge.el
--- a/lisp/emerge.el	Wed Oct 19 04:51:45 1994 +0000
+++ b/lisp/emerge.el	Wed Oct 19 07:47:54 1994 +0000
@@ -251,7 +251,9 @@
 displaying a difference.")
 
 (defvar emerge-temp-file-prefix
-  (let ((env (getenv "TMPDIR"))
+  (let ((env (or (getenv "TMPDIR")
+		 (getenv "TMP")
+		 (getenv "TEMP")))
 	d)
     (setq d (if (and env (> (length env) 0))
 		env