From: Ricardo SIGNES Date: Mon, 22 Oct 2007 09:01:09 +0000 (-0400) Subject: hostname.t busted X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=adeb94125ab7de8d20c129a905a5159972ad9fd1;p=p5sagit%2Fp5-mst-13.2.git 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";