www

commit 6f551d4c9d8f680b48fa4106d873f960d21141d9
parent d238adf746611e53a1170b9f63bf4f3b0a636f76
Author: Sam Tobin-Hochstadt <samth@racket-lang.org>
Date:   Sat, 13 Jul 2013 12:53:42 -0400

scheme -> racket

Diffstat:
M
lang-slide/main.rkt
 | 
5
+++--
M
lang-slide/mk-img.rkt
 | 
4
++--

2 files changed, 5 insertions(+), 4 deletions(-)
diff --git a/lang-slide/main.rkt b/lang-slide/main.rkt
@@ -4,9 +4,9 @@
          langs-with-colors)
 (require "draw-plain.ss"
          "orig-colors.rkt"
-         slideshow slideshow/code
+         racket/draw slideshow/code
          scheme/runtime-path
-         racket/gui/base)
+         slideshow)
 (define-runtime-path lang-colors.rktd "lang-colors.rktd")
 
 (define (color->name c)
@@ -99,5 +99,6 @@
   (inset (lang-pict 550 color?) 14 10 -10 10))
 
 (module+ main
+  (require slideshow)
   (slide (langs-pict #f))
   (slide (langs-pict #t)))
diff --git a/lang-slide/mk-img.rkt b/lang-slide/mk-img.rkt
@@ -1,5 +1,5 @@
-#lang scheme/gui
-(require "main.rkt" slideshow)
+#lang racket/base
+(require "main.rkt" racket/draw slideshow/pict racket/class)
 
 (define the-margin 32)