[rpms/perl-Sys-Virt] epel10.2: Fix hostname test

[rpms/perl-Sys-Virt] epel10.2: Fix hostname test

[Daniel P. Berrange]

A new commit has been pushed.

Repo   : rpms/perl-Sys-Virt
Branch : epel10.2
Commit : cdb47a9ebd4de5128b0d5c536da9e39a581b4b3f
Author : Daniel P. Berrange <berrange@redhat.com>
Date   : 2010-08-14T16:23:43-04:00
Stats  : +14/-0 in 2 file(s)
URL    : https://src.fedoraproject.org/rpms/perl-Sys-Virt/c/cdb47a9ebd4de5128b0d5c536da9e39a581b4b3f?branch=epel10.2

Log:
Fix hostname test

---
diff --git a/Sys-Virt-0.2.4-hostname.patch b/Sys-Virt-0.2.4-hostname.patch
new file mode 100644
index 0000000..64ca741
--- /dev/null
+++ b/Sys-Virt-0.2.4-hostname.patch
@@ -0,0 +1,11 @@
+diff -rup Sys-Virt-0.2.4.orig/t/100-connect.t Sys-Virt-0.2.4.new/t/100-connect.t
+--- Sys-Virt-0.2.4.orig/t/100-connect.t	2010-05-19 07:56:18.000000000 -0400
++++ Sys-Virt-0.2.4.new/t/100-connect.t	2010-08-14 16:06:45.987592899 -0400
+@@ -67,6 +67,7 @@ is($max, 32, "max cpus");
+ 
+ my $thishost = hostname();
+ my ($canonhost, $other) = gethostbyname($thishost);
++$canonhost = $thishost unless $canonhost;
+ my $host = $conn->get_hostname();
+ is($host, $canonhost, "hostname");
+ 

diff --git a/perl-Sys-Virt.spec b/perl-Sys-Virt.spec
index 9e3dda2..987bb7e 100644
--- a/perl-Sys-Virt.spec
+++ b/perl-Sys-Virt.spec
@@ -6,6 +6,7 @@ License:        GPLv2+ or Artistic
 Group:          Development/Libraries
 URL:            http://search.cpan.org/dist/Sys-Virt/
 Source0:        http://www.cpan.org/authors/id/D/DA/DANBERR/Sys-Virt-%{version}.tar.gz
+Patch1:         Sys-Virt-%{version}-hostname.patch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
 BuildRequires:  perl(ExtUtils::MakeMaker)
 BuildRequires:  perl(Test::Pod)
@@ -21,6 +22,7 @@ virtualization containers to be managed with a consistent API.
 
 %prep
 %setup -q -n Sys-Virt-%{version}
+%patch1 -p1
 
 sed -i -e '/Sys-Virt\.spec/d' Makefile.PL
 sed -i -e '/\.spec\.PL$/d' MANIFEST
@@ -57,6 +59,7 @@ rm -rf $RPM_BUILD_ROOT
 %changelog
 * Sat Aug 14 2010 Daniel P. Berrange <berrange@redhat.com> - 0.2.4-2
 - Rebuild against perl 5.12.0
+- Fix hostname test
 
 * Wed May 19 2010 Daniel P. Berrange <berrange@redhat.com> - 0.2.4-1
 - Update to 0.2.4 release