io.files: temp-dir -> temp-directory

db4
Eduardo Cavazos 2008-02-22 01:01:14 -06:00
parent ba60ab8c6a
commit aae3913b59
1 changed files with 2 additions and 2 deletions
core/io/files

View File

@ -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+ ;