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