diff --git a/src/mzscheme/src/file.c b/src/mzscheme/src/file.c index c2254f9feb..0b1c0d7054 100644 --- a/src/mzscheme/src/file.c +++ b/src/mzscheme/src/file.c @@ -5685,6 +5685,9 @@ find_system_path(int argc, Scheme_Object **argv) return scheme_make_path(p); } + if (scheme_directory_exists("/var/tmp")) + return scheme_make_path("/var/tmp"); + if (scheme_directory_exists("/usr/tmp")) return scheme_make_path("/usr/tmp");