From ffe39c597411d49ce3d24560c221efc7699c3e8b Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 10 Jul 2012 11:37:08 -0600 Subject: [PATCH] fix support code for some tests --- collects/tests/gracket/test-editor-admin.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/tests/gracket/test-editor-admin.rkt b/collects/tests/gracket/test-editor-admin.rkt index d07323663c..3dbc1e4e34 100644 --- a/collects/tests/gracket/test-editor-admin.rkt +++ b/collects/tests/gracket/test-editor-admin.rkt @@ -15,7 +15,7 @@ (define/override (get-brush . b) #f) (define/override (set-clipping-rect . b) (void)) (define/override (get-clipping-region . b) #f) - (define/override (draw-text s x y combine? offset count) (void)) + (define/override (draw-text s x y [combine? #f] [offset 0] [angle 0.0]) (void)) (define/override (cache-font-metrics-key) 100))))