diff --git a/library/ui/cocoa/services.factor b/library/ui/cocoa/services.factor index e6887d82f8..d7dcbf6602 100644 --- 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"