mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-04-26 03:10:35 -07:00
Code Issues Projects Releases Packages Wiki Activity

Provide a sane default for the "TMP" pathname host on UNIX.

Browse source
This commit is contained in:
Samium Gromoff 2009-04-09 21:08:13 +04:00 • committed by Juan Jose Garcia Ripoll
parent 6661ef033b
commit bc74ead74f
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/lsp/config.lsp.in
View file

@ -121,6 +121,6 @@ Returns, as a string, the version of the software under which ECL runs."
(probe-file x)))
((and (setf x (ext:getenv "TMP"))
(probe-file x)))
(t (setf x "./")))
(t (setf x #+unix "/tmp" #-unix "./")))
(si::pathname-translations "TMP"
`(("**;*.*" ,(format nil "~A/**/*.*" x)))))