From 667462e848a07636ae7968966f2e3805853cbf8e Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Tue, 9 Jun 2015 08:03:35 -0700
Subject: [PATCH] tools.coverage: fix refactor bug.

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

diff --git a/basis/tools/coverage/coverage.factor b/basis/tools/coverage/coverage.factor
index ff37fa441d..48a45eb3c1 100644
--- a/basis/tools/coverage/coverage.factor
+++ b/basis/tools/coverage/coverage.factor
@@ -131,7 +131,7 @@ PRIVATE>
     { [ ".private" tail? ] [ ".tests" tail? ] } 1|| not ;
 
 : test-coverage-recursively ( prefix -- assoc )
-    disk-vocabs-for-prefix [ coverage-vocab? ] filter
+    loaded-child-vocab-names [ coverage-vocab? ] filter
     [ dup test-coverage ] { } map>assoc ;
 
 : %coverage ( string -- x )