From 072dd3b0d077b104e829709880f97976394bbd31 Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Sun, 14 Feb 2010 09:59:36 -0800
Subject: [PATCH] vocabs.metadata.resources: don't try to expand resource
patterns for vocabs without a resources.txt
---
basis/vocabs/metadata/resources/resources.factor | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/basis/vocabs/metadata/resources/resources.factor b/basis/vocabs/metadata/resources/resources.factor
index 1da15f6b9e..e37bdc273f 100644
--- a/basis/vocabs/metadata/resources/resources.factor
+++ b/basis/vocabs/metadata/resources/resources.factor
@@ -21,4 +21,5 @@ PRIVATE>
] with-directory-tree-files ;
: vocab-resource-files ( vocab -- filenames )
- dup vocab-resources expand-vocab-resource-files ;
+ dup vocab-resources
+ [ drop f ] [ expand-vocab-resource-files ] if-empty ;