]> gitweb.factorcode.org Git - factor.git/commitdiff
vocabs.loader: use adjoin-all.
authorJohn Benediktsson <mrjbq7@gmail.com>
Sun, 24 Mar 2013 05:07:08 +0000 (22:07 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Sun, 24 Mar 2013 05:07:08 +0000 (22:07 -0700)
core/vocabs/loader/loader.factor

index 47fe95e747d670b53231629d78ec1fb6dca2e883..1e663d668cbe5a386ad8358e6413586292181e61 100644 (file)
@@ -112,7 +112,7 @@ PRIVATE>
     over [ lookup-vocab ] all? [
         require drop
     ] [
-        [ drop [ require-when-vocabs get adjoin ] each ]
+        [ drop require-when-vocabs get adjoin-all ]
         [ 2array require-when-table get push ] 2bi
     ] if ;