From d142dbb456f540e4e11348cf35d3c3922438f998 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Mon, 19 Sep 2011 17:46:52 -0700
Subject: [PATCH] Revert "classes.singleton: fix "summary" of singletons. Fixes
 #145."

This reverts commit d820c86974e5317d02ac43a1c32b1aa5f56f872b.
---
 core/classes/singleton/singleton.factor | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/core/classes/singleton/singleton.factor b/core/classes/singleton/singleton.factor
index b70e3e074a..02ca405145 100644
--- a/core/classes/singleton/singleton.factor
+++ b/core/classes/singleton/singleton.factor
@@ -1,8 +1,8 @@
 ! Copyright (C) 2008, 2010 Doug Coleman, Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: classes classes.algebra classes.algebra.private
-classes.predicate classes.predicate.private definitions kernel
-sequences words ;
+classes.predicate classes.predicate.private kernel sequences
+words ;
 IN: classes.singleton
 
 <PRIVATE
@@ -25,7 +25,4 @@ M: singleton-class (classes-intersect?)
     over singleton-class? [ eq? ] [ call-next-method ] if ;
 
 M: singleton-class predicate-quot
-    singleton-predicate-quot ;
-
-M: singleton-class definer
-    drop \ SINGLETON: f ;
+    singleton-predicate-quot ;
\ No newline at end of file