Don't add f to vocab-roots

2008-12-02 01:15:34 -05:00 · 2008-12-02 01:15:34 -05:00 · 082b788cdb
parent 2777f54e74
commit 082b788cdb
1 changed files with 5 additions and 2 deletions
--- a/basis/environment/environment.factor
+++ b/basis/environment/environment.factor
@ -27,6 +27,9 @@ HOOK: (set-os-envs) os ( seq -- )
 } cond

 [
-    "FACTOR_ROOTS" os-env os windows? ";" ":" ? split
-    [ add-vocab-root ] each
+    "FACTOR_ROOTS" os-env
+    [
+        os windows? ";" ":" ? split
+        [ add-vocab-root ] each
+    ] when*    
 ] "environment" add-init-hook