From 57beeb28adb498070ab3316da8a32b061be6ab27 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 2 Nov 2004 03:45:03 +0000
Subject: [PATCH] .

original commit: 848a58b2ea3d3b9e85b8ae64906a6cb947c1cede
---
 collects/mred/mred.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mred/mred.ss b/collects/mred/mred.ss
index 679a58f1..e556274a 100644
--- a/collects/mred/mred.ss
+++ b/collects/mred/mred.ss
@@ -4879,7 +4879,7 @@
 	  (send wx get-canvas-background)))]
 
       [set-resize-corner (lambda (on?)
-			   (send wx set-resize-corner))])
+			   (send wx set-resize-corner on?))])
     (private-field
       [wx #f])
     (sequence