diff --git a/perl-Net-DNS-bz437681.patch b/perl-Net-DNS-bz437681.patch
index 813f480..5a5887b 100644
--- a/perl-Net-DNS-bz437681.patch
+++ b/perl-Net-DNS-bz437681.patch
@@ -6,7 +6,7 @@ diff -up Net-DNS-0.63/lib/Net/DNS/Resolver/Base.pm.BAD Net-DNS-0.63/lib/Net/DNS/
  	 eval {require IO::Socket::INET6; IO::Socket::INET6->VERSION("2.00");}
  	 ) {
 - 	import Socket6;
-+ 	use Socket6 (qw(getaddrinfo));
++ 	Socket6->import(qw(getaddrinfo));
   	$has_inet6=1;
      }else{
   	$has_inet6=0;
diff --git a/perl-Net-DNS.spec b/perl-Net-DNS.spec
index 075a5cc..c46a06c 100644
--- a/perl-Net-DNS.spec
+++ b/perl-Net-DNS.spec
@@ -1,6 +1,6 @@
 Name: perl-Net-DNS
 Version: 0.63
-Release: 2%{?dist}
+Release: 3%{?dist}
 Summary: DNS resolver modules for Perl
 License: GPL+ or Artistic
 Group: Development/Libraries
@@ -82,6 +82,9 @@ rm -rf $RPM_BUILD_ROOT
 
 
 %changelog
+* Wed Apr  9 2008 Tom "spot" Callaway <tcallawa@redhat.com> - 0.63-3
+- fix patch to not require Socket6
+
 * Wed Apr  9 2008 Tom "spot" Callaway <tcallawa@redhat.com> - 0.63-2
 - fix AF_INET6/PF_INET6 redefine noise (bz 437681)