From f03408aa5b712336301a4274dfb016690ba9d4e1 Mon Sep 17 00:00:00 2001
From: Brian Fraser <fraserbn@gmail.com>
Date: Tue, 14 May 2013 08:59:06 -0300
Subject: Net::Domain: Stop domainname() from giving out warnings in android

---
 Net/Domain.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Net/Domain.pm b/Net/Domain.pm
index d47f8be..59c803a 100644
--- a/Net/Domain.pm
+++ b/Net/Domain.pm
@@ -169,7 +169,7 @@ sub _hostdomain {
     }
 
     chop($dom = `domainname 2>/dev/null`)
-      unless (defined $dom || $^O =~ /^(?:cygwin|MSWin32)/);
+      unless (defined $dom || $^O =~ /^(?:cygwin|MSWin32|android)/);
 
     if (defined $dom) {
       my @h = ();
-- 
cgit v1.2.3-24-ge0c7