services fix

2006-10-26 04:07:55 +00:00 · 2006-10-26 04:07:55 +00:00 · 227b0d469a
parent 32079bb52b
commit 227b0d469a
1 changed files with 1 additions and 6 deletions
--- a/library/ui/cocoa/services.factor
+++ b/library/ui/cocoa/services.factor
@ -27,12 +27,7 @@ parser prettyprint styles gadgets-listener gadgets-workspace ;
    {
        "evalInListener:userData:error:" "void"
        { "id" "SEL" "id" "id" "void*" }
-        [
-            nip
-            [ eval-listener f ]
-            do-service
-            2drop
-        ]
+        [ nip [ eval-listener f ] do-service 2drop ]
    }
    {
        "evalToString:userData:error:" "void"