vocabs.loader: use adjoin-all.

2013-03-23 22:07:08 -07:00 · 2013-03-23 22:07:08 -07:00 · da84d1ce21
parent cd1c6ccda0
commit da84d1ce21
1 changed files with 1 additions and 1 deletions
--- a/core/vocabs/loader/loader.factor
+++ b/core/vocabs/loader/loader.factor
@ -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 ;