commit adeb94125ab7de8d20c129a905a5159972ad9fd1 Author: Ricardo SIGNES Date: Mon Oct 22 05:01:09 2007 -0400 hostname.t busted Message-ID: <20071022130109.GA16748@knight> p4raw-id: //depot/perl@32180 diff --git a/lib/Net/t/hostname.t b/lib/Net/t/hostname.t index 758d304..4013d74 100644 --- a/lib/Net/t/hostname.t +++ b/lib/Net/t/hostname.t @@ -26,7 +26,10 @@ print "1..5\n"; $domain = domainname(); if(defined $domain && $domain ne "") { - print "ok 1\n"; + print "ok 1 - defined, non-empty domainname\n"; +} +elsif (not defined $domain) { + print "ok 1 # SKIP domain not fully defined\n"; } else { print "not ok 1\n";