Skip to content
Browse files

applied patch by Kieron Hardy

  • Loading branch information...
1 parent 433713e commit 76b376b2c04633e7b22d1054d550b01c06a074fb @Metaxal committed Aug 6, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 tests/mred-designer.ss
View
4 tests/mred-designer.ss
@@ -166,7 +166,7 @@
(button-hierarchy-down-callback
(lambda (button control-event) (void)))
#:canvas-9346-paint-callback
- (canvas-9346-paint-callback (? (canvas dc) (void))))
+ (canvas-9346-paint-callback (lambda (canvas dc) (void))))
(set! frame-toolbox
(new
frame%
@@ -355,7 +355,7 @@
(choices (list "First" "Second"))
(callback choice-5385-callback)
(style
- ((? (l) (list* (first l) (second l))) (list 'horizontal-label '())))
+ ((lambda (l) (list* (first l) (second l))) (list 'horizontal-label '())))
(font (list->font (list 8 'default 'normal 'normal #f 'default #f)))
(selection 0)
(enabled #t)

0 comments on commit 76b376b

Please sign in to comment.
Something went wrong with that request. Please try again.