Merge branch 'master' of git://factorcode.org/git/factor

basis/mirrors/mirrors-docs.factor

@@ -30,7 +30,7 @@ HELP: <mirror> ( object -- mirror )
         "TUPLE: circle center radius ;"
         "C: <circle> circle"
         "{ 100 50 } 15 <circle> <mirror> >alist ."
-        "{ { \"delegate\" f } { \"center\" { 100 50 } } { \"radius\" 15 } }"
+        "{ { \"center\" { 100 50 } } { \"radius\" 15 } }"
     }
 } ;
 

extra/inverse/inverse.factor

@@ -207,7 +207,7 @@ DEFER: _
     "predicate" word-prop [ dupd call assure ] curry ;
 
 : slot-readers ( class -- quot )
-    all-slots rest ! tail gets rid of delegate
+    all-slots
     [ name>> reader-word 1quotation [ keep ] curry ] map concat
     [ ] like [ drop ] compose ;
 

extra/irc/messages/messages.factor

@@ -127,4 +127,4 @@ M: sender-in-prefix irc-message-sender ( sender-in-prefix -- sender )
     } case
     [ [ tuple-slots ] [ parameters>> ] bi append ] dip
     [ all-slots over [ length ] bi@ min head >quotation ] keep
-    '[ @ , boa nip ] call ;
+    '[ @ , boa ] call ;