From 54cfca1f1e5c933ce8517c72a0055e58f8afb28e Mon Sep 17 00:00:00 2001 From: John Benediktsson <mrjbq7@gmail.com> Date: Mon, 13 Aug 2012 12:36:02 -0700 Subject: [PATCH] Revert "vocabs.cache: oops." This reverts commit c7c0fd7a4638632a724ab2e2862bed1a0ac14eb1. --- basis/vocabs/cache/cache.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/vocabs/cache/cache.factor b/basis/vocabs/cache/cache.factor index e8e1e5f177..cca8d563d8 100644 --- a/basis/vocabs/cache/cache.factor +++ b/basis/vocabs/cache/cache.factor @@ -9,7 +9,7 @@ IN: vocabs.cache vocab-name [ root-cache get-global delete-at ] [ - \ vocab-file-contents "memoize" word-prop swap + \ vocab-file-contents "memoize" word-prop '[ drop first vocab-name _ = not ] assoc-filter! drop ] bi \ all-vocabs-recursive reset-memoized