From 99daf6a9d18330c06d43a451e851c794fb384a48 Mon Sep 17 00:00:00 2001
From: Jon Rafkind <rafkind@racket-lang.org>
Date: Thu, 26 Jan 2012 15:23:20 -0700
Subject: [PATCH] [honu] fix tests

---
 collects/tests/honu/linq.honu | 4 ++--
 collects/tests/honu/linq.rkt  | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/collects/tests/honu/linq.honu b/collects/tests/honu/linq.honu
index 455d0871cb..96866885f4 100644
--- a/collects/tests/honu/linq.honu
+++ b/collects/tests/honu/linq.honu
@@ -5,7 +5,7 @@ require "linq.rkt";
 
 class Xml(data){
   Descendants(name){
-    [new Xml(element): element <- find_descendants(data, name)]
+    [new Xml(element): element = find_descendants(data, name)]
   }
 
   Element(name){
@@ -25,7 +25,7 @@ read_xml(){
 }
 
 loadXml(file){
-  with_input_from_file(file){
+  withInputFromFile(file){
     new Xml(read_xml())
   }
 }
diff --git a/collects/tests/honu/linq.rkt b/collects/tests/honu/linq.rkt
index f88fda685e..ce04b1a5f1 100644
--- a/collects/tests/honu/linq.rkt
+++ b/collects/tests/honu/linq.rkt
@@ -1,6 +1,6 @@
 #lang racket/base
 
-(require honu/core/private/macro2
+(require honu/core/private/syntax
          honu/core/private/honu-typed-scheme
          honu/core/private/literals
          racket/list