--- AnyEvent/t/handle/03_http_req.t	2008/05/17 21:08:05	1.7
+++ AnyEvent/t/handle/03_http_req.t	2008/05/23 17:47:06	1.8
@@ -4,6 +4,7 @@
 
 use AnyEvent::Impl::Perl;
 use AnyEvent;
+use AnyEvent::Socket;
 use AnyEvent::Handle;
 
 unless ($ENV{PERL_ANYEVENT_NET_TESTS}) {
@@ -18,7 +19,7 @@
 my $rbytes;
 
 my $hdl;
-my $wo = AnyEvent::Util::tcp_connect 'www.google.com', 80, sub {
+my $wo = tcp_connect 'www.google.com', 80, sub {
    my ($sock) = @_;
    $hdl =
       AnyEvent::Handle->new (