From 954596c9476c46a5792919e93706f9f5500533e4 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Mon, 9 Feb 2009 18:04:18 -0600
Subject: [PATCH] ui.tools.listener: fix tests

---
 basis/ui/tools/listener/listener-tests.factor | 11 +----------
 1 file changed, 1 insertion(+), 10 deletions(-)

diff --git a/basis/ui/tools/listener/listener-tests.factor b/basis/ui/tools/listener/listener-tests.factor
index 6fb0f6e79c..223f4e7f59 100644
--- a/basis/ui/tools/listener/listener-tests.factor
+++ b/basis/ui/tools/listener/listener-tests.factor
@@ -152,13 +152,4 @@ IN: ui.tools.listener.tests
 
 [ ] [ <listener-gadget> "l" set ] unit-test
 [ ] [ "l" get com-scroll-up ] unit-test
-[ ] [ "l" get com-scroll-down ] unit-test
-[ ] [ "l" get hide-popup ] unit-test
-[ ] [ <gadget> "l" get show-popup ] unit-test
-[ ] [ "l" get hide-popup ] unit-test
-
-[ ] [
-    <gadget> "l" get show-popup
-    <gadget> "l" get show-popup
-    "l" get hide-popup
-] unit-test
\ No newline at end of file
+[ ] [ "l" get com-scroll-down ] unit-test
\ No newline at end of file