vocabs.loader: make vocab-dir+ use path-separator too

2010-02-16 19:29:42 -08:00 · 2010-02-16 19:29:42 -08:00 · 2dcc720629
parent f344c00629
commit 2dcc720629
1 changed files with 1 additions and 1 deletions
--- a/core/vocabs/loader/loader.factor
+++ b/core/vocabs/loader/loader.factor
@ -42,7 +42,7 @@ PRIVATE>
 : vocab-dir+ ( vocab str/f -- path )
    [ vocab-name "." split ] dip
    [ [ dup last ] dip append suffix ] when*
-    "/" join ;
+    path-separator join ;

 : find-vocab-root ( vocab -- path/f )
    vocab-name dup root-cache get at