Better fix for *BSD resource path

db4
Slava Pestov 2008-09-18 00:20:51 -05:00
parent 34faf1f786
commit 562118e158
2 changed files with 1 additions and 4 deletions

View File

@ -26,7 +26,6 @@ IN: bootstrap.image
"x86.32"
"x86.64"
"linux-ppc" "macosx-ppc"
! "arm"
} ;
<PRIVATE

View File

@ -194,9 +194,7 @@ SYMBOL: current-directory
[
cwd current-directory set-global
image parent-directory "./" ?head
[ cwd prepend-path ] when
"resource-path" set
image parent-directory cwd prepend-path "resource-path" set
] "io.files" add-init-hook
: resource-path ( path -- newpath )