From 80a1a68e0f17ded3ac579263f134be6609444384 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Tue, 25 Oct 2011 14:53:56 -0700
Subject: [PATCH] Fix error reporting for load, reported by Recursed

---
 basis/vocabs/hierarchy/hierarchy.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/vocabs/hierarchy/hierarchy.factor b/basis/vocabs/hierarchy/hierarchy.factor
index 48d9591ecc..947209b2d9 100644
--- a/basis/vocabs/hierarchy/hierarchy.factor
+++ b/basis/vocabs/hierarchy/hierarchy.factor
@@ -144,7 +144,7 @@ PRIVATE>
     [ vocab-roots get ] dip '[ _ (load-from-root) ] map concat ;
 
 : load ( prefix -- )
-    (load) [ load-failures. ] each ;
+    (load) load-failures. ;
 
 : load-all ( -- )
     "" load ;