From e73ed5c35e4559fc52ee0cf2bfcf859b352ab76c Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Fri, 5 Jun 2009 08:16:37 +0000
Subject: [PATCH] require typo, mostly

svn: r15088
---
 collects/2htdp/utest/ball2.ss | 2 +-
 collects/2htdp/utest/player   | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/collects/2htdp/utest/ball2.ss b/collects/2htdp/utest/ball2.ss
index 529e2fc6a3..5f70267bce 100644
--- a/collects/2htdp/utest/ball2.ss
+++ b/collects/2htdp/utest/ball2.ss
@@ -1,6 +1,6 @@
 #lang scheme/gui
 
-(require "../2htdp/universe.ss")
+(require 2htdp/universe)
 
 (define-struct unistate (active passive) #:transparent)
 
diff --git a/collects/2htdp/utest/player b/collects/2htdp/utest/player
index e26c96e959..f74ff05cf2 100755
--- a/collects/2htdp/utest/player
+++ b/collects/2htdp/utest/player
@@ -1,5 +1,5 @@
 #! /bin/sh
-#|
+#| -*- scheme -*-
 exec mred -qu "$0" ${1+"$@"}
 |#
 
@@ -11,6 +11,6 @@ exec mred -qu "$0" ${1+"$@"}
 
 (unless (= (vector-length argv) 1)
   (error 'player "name of one player expected: $ ./player name"))
-  
+
 (make-player 200 (string->symbol (vector-ref argv 0)))