io.files: the paths are absolute so cwd prepend-path isn't needed

char-rename
Björn Lindqvist 2016-09-14 14:02:11 +02:00
parent 3dbec75864
commit 3bbf421043
1 changed files with 3 additions and 4 deletions

View File

@ -1,7 +1,6 @@
! Copyright (C) 2004, 2009 Slava Pestov, Daniel Ehrenberg.
! See http://factorcode.org/license.txt for BSD license.
USING: alien.strings continuations init io io.backend
io.encodings io.encodings.utf8 io.files.private io.pathnames
USING: alien.strings init io io.backend io.encodings io.pathnames
kernel kernel.private namespaces sequences splitting system ;
IN: io.files
@ -92,7 +91,7 @@ PRIVATE>
[
cwd current-directory set-global
OBJ-IMAGE special-object alien>native-string cwd prepend-path \ image-path set-global
OBJ-EXECUTABLE special-object alien>native-string cwd prepend-path \ vm-path set-global
OBJ-IMAGE special-object alien>native-string \ image-path set-global
OBJ-EXECUTABLE special-object alien>native-string \ vm-path set-global
init-resource-path
] "io.files" add-startup-hook