add XS version of Sys::Hostname (from Greg Bacon

<gbacon@itsc.uah.edu>)

p4raw-id: //depot/perl@5110

1 files changed, 1 insertions, 0 deletions

diff --git a/t/lib/hostname.t b/t/lib/hostname.t
index 30dcf0f0b7..6f61fb9dad 100755
--- a/t/lib/hostname.t
+++ b/t/lib/hostname.t
@@ -15,5 +15,6 @@ if ($@) {
     print "1..0\n" if $@ =~ /Cannot get host name/;
 } else {
     print "1..1\n";
+    print "# \$host = `$host'\n";
     print "ok 1\n";
 }