io.files.temp: use a startup hook as the temp directory could change from run to run.
parent
2aadc94b10
commit
73de6246b7
|
@ -1,5 +1,5 @@
|
||||||
! (c)2012 Joe Groff bsd license
|
! (c)2012 Joe Groff bsd license
|
||||||
USING: combinators io.directories io.pathnames kernel
|
USING: combinators init io.directories io.pathnames kernel
|
||||||
namespaces system vocabs ;
|
namespaces system vocabs ;
|
||||||
IN: io.files.temp
|
IN: io.files.temp
|
||||||
|
|
||||||
|
@ -35,10 +35,10 @@ SYMBOL: current-cache-directory
|
||||||
{ [ os unix? ] [ "io.files.temp.unix" ] }
|
{ [ os unix? ] [ "io.files.temp.unix" ] }
|
||||||
} cond require
|
} cond require
|
||||||
|
|
||||||
\ current-temp-directory [
|
[
|
||||||
default-temp-directory dup make-directories
|
default-temp-directory dup make-directories
|
||||||
] initialize
|
current-temp-directory set-global
|
||||||
|
|
||||||
\ current-cache-directory [
|
|
||||||
default-cache-directory dup make-directories
|
default-cache-directory dup make-directories
|
||||||
] initialize
|
current-cache-directory set-global
|
||||||
|
] "io.files.temp" add-startup-hook
|
||||||
|
|
Loading…
Reference in New Issue