From c9d0319a11cb2aae6d1e81d0c6465b4241a4ecff Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 24 Jul 2012 11:10:35 -0500 Subject: [PATCH] add missing `super-new' from class100 conversion Also, move relevant tests to a better place. Merge to v5.3 (cherry picked from commit 289ae98c8e278fdcf4c33d4c7a4b3470ffaa3747) --- collects/graphics/graphics-posn-less-unit.rkt | 1 + collects/{tests/gracket => graphics/tests}/sixlib.rktl | 0 collects/meta/props | 2 +- 3 files changed, 2 insertions(+), 1 deletion(-) rename collects/{tests/gracket => graphics/tests}/sixlib.rktl (100%) diff --git a/collects/graphics/graphics-posn-less-unit.rkt b/collects/graphics/graphics-posn-less-unit.rkt index d83258fd9e..7a04ac8a97 100644 --- a/collects/graphics/graphics-posn-less-unit.rkt +++ b/collects/graphics/graphics-posn-less-unit.rkt @@ -67,6 +67,7 @@ (define sixlib-canvas% (class mred:canvas% + (super-new) (inherit get-parent min-client-width min-client-height stretchable-width stretchable-height) diff --git a/collects/tests/gracket/sixlib.rktl b/collects/graphics/tests/sixlib.rktl similarity index 100% rename from collects/tests/gracket/sixlib.rktl rename to collects/graphics/tests/sixlib.rktl diff --git a/collects/meta/props b/collects/meta/props index 35edcd648c..510d4fe2f3 100755 --- a/collects/meta/props +++ b/collects/meta/props @@ -760,6 +760,7 @@ path/s is either such a string or a list of them. "collects/games/paint-by-numbers/raw-problems/size-calculation.rkt" drdr:command-line (mzc *) "collects/games/parcheesi/make-bitmap.rkt" drdr:command-line (mzc *) "collects/graphics" responsible (mflatt robby) +"collects/graphics/tests/sixlib.rktl" drdr:command-line #f "collects/graphics/turtle-test.rkt" drdr:command-line (mzc "-k" *) "collects/graphics/value-turtles-test.rkt" drdr:command-line (mzc *) "collects/gui-debugger" responsible (gmarceau mflatt) @@ -1071,7 +1072,6 @@ path/s is either such a string or a list of them. "collects/tests/gracket/paramz.rktl" drdr:command-line (gracket "-f" *) "collects/tests/gracket/png.rktl" drdr:command-line #f "collects/tests/gracket/showkey.rkt" drdr:command-line #f -"collects/tests/gracket/sixlib.rktl" drdr:command-line #f "collects/tests/gracket/text-scale.rktl" drdr:command-line #f "collects/tests/gracket/unflushed-circle.rkt" drdr:command-line #f "collects/tests/gracket/windowing.rktl" drdr:command-line (gracket "-f" *)