From 797b023216393af7ee49ba06d93b13f2874b7302 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Mon, 13 Feb 2006 17:04:50 +0000
Subject: [PATCH] set svn:eol-style and fix some stuff

svn: r2209
---
 collects/htdch/idraw/World-native-methods.ss | 1 -
 collects/htdch/idraw/World.java              | 2 +-
 collects/htdch/idraw/installer.ss            | 6 +-----
 collects/htdch/idraw/pre-installer.ss        | 3 +--
 4 files changed, 3 insertions(+), 9 deletions(-)

diff --git a/collects/htdch/idraw/World-native-methods.ss b/collects/htdch/idraw/World-native-methods.ss
index fe8ccb32fa..515ded9235 100644
--- a/collects/htdch/idraw/World-native-methods.ss
+++ b/collects/htdch/idraw/World-native-methods.ss
@@ -119,4 +119,3 @@
     (end-of-time)
     (void))
 )
-
diff --git a/collects/htdch/idraw/World.java b/collects/htdch/idraw/World.java
index 49fb922836..70eb6316c1 100644
--- a/collects/htdch/idraw/World.java
+++ b/collects/htdch/idraw/World.java
@@ -15,4 +15,4 @@ public abstract class World {
     public abstract void draw();
 
     public abstract void erase();
-}    
+}
diff --git a/collects/htdch/idraw/installer.ss b/collects/htdch/idraw/installer.ss
index 7f0f975176..468024e19d 100644
--- a/collects/htdch/idraw/installer.ss
+++ b/collects/htdch/idraw/installer.ss
@@ -1,10 +1,7 @@
 (module installer mzscheme
   (require (lib "compile.ss" "profj"))
   (provide installer)
-  
-  (define (mprintf a)
-    (fprintf a (current-error-port)))
-  
+
   (define (installer plthome)
     (let ((draw-path (build-path (collection-path "htdch" "idraw"))))
       (let ((javac
@@ -25,4 +22,3 @@
         (javac "Green.java")
         (javac "Yellow.java")
         ))))
-           
diff --git a/collects/htdch/idraw/pre-installer.ss b/collects/htdch/idraw/pre-installer.ss
index 2c0d4f9a82..3fc8b0d778 100644
--- a/collects/htdch/idraw/pre-installer.ss
+++ b/collects/htdch/idraw/pre-installer.ss
@@ -1,7 +1,7 @@
 (module pre-installer mzscheme
   (require (lib "compile.ss" "profj"))
   (provide pre-installer)
-  
+
   (define (pre-installer plthome)
     (let ((draw-path (build-path (collection-path "htdch" "idraw"))))
       (let ((javac
@@ -12,4 +12,3 @@
                                #f #f)))))
         (javac "Posn.java")
         ))))
-