From a9f1394468f2c3aefecd67bc9161a6e1ba6183a4 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Tue, 6 Jan 2009 13:45:46 -0600
Subject: [PATCH] Add a failing unit test

---
 basis/tools/vocabs/browser/browser-tests.factor | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/basis/tools/vocabs/browser/browser-tests.factor b/basis/tools/vocabs/browser/browser-tests.factor
index 7e12a56cf2..385d1b2d46 100644
--- a/basis/tools/vocabs/browser/browser-tests.factor
+++ b/basis/tools/vocabs/browser/browser-tests.factor
@@ -1,4 +1,5 @@
 IN: tools.vocabs.browser.tests
-USING: tools.vocabs.browser tools.test help.markup ;
+USING: tools.vocabs.browser tools.test help.markup help vocabs ;
 
-[ ] [ { $describe-vocab "scratchpad" } print-content ] unit-test
+[ ] [ { $vocab "scratchpad" } print-content ] unit-test
+[ ] [ "classes" vocab print-topic ] unit-test
\ No newline at end of file