io.files: temp-dir -> temp-directory
parent
ba60ab8c6a
commit
aae3913b59
|
@ -155,10 +155,10 @@ M: pathname <=> [ pathname-string ] compare ;
|
|||
: with-file-appender ( path quot -- )
|
||||
>r <file-appender> r> with-stream ; inline
|
||||
|
||||
: temp-dir ( -- path )
|
||||
: temp-directory ( -- path )
|
||||
"temp" resource-path
|
||||
dup exists? not
|
||||
[ dup make-directory ]
|
||||
when ;
|
||||
|
||||
: temp-file ( name -- path ) temp-dir swap path+ ;
|
||||
: temp-file ( name -- path ) temp-directory swap path+ ;
|
Loading…
Reference in New Issue