From 50484f3e699a94cf0549db63023cae7f45ffb91c Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Tue, 5 Feb 2008 16:35:42 -0600
Subject: [PATCH] Fix MIMIC:

---
 extra/delegate/delegate.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/delegate/delegate.factor b/extra/delegate/delegate.factor
index c0da9c51bc..667805dcc3 100755
--- a/extra/delegate/delegate.factor
+++ b/extra/delegate/delegate.factor
@@ -39,7 +39,7 @@ M: tuple-class group-words
 : define-mimic ( group mimicker mimicked -- )
     >r >r group-words r> r> [
         pick "methods" word-prop at dup
-        [ method-def <method> spin define-method ] [ 3drop ] if
+        [ method-def spin define-method ] [ 3drop ] if
     ] 2curry each ; 
 
 : MIMIC: