From: Gurusamy Sarathy <gsar@cpan.org>
Date: Mon, 9 Jun 2003 18:17:42 +0000 (+0000)
Subject: mark 450_service.t#18 as a todo test on windows
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=dd59707a39627e9cd9e0c7726087555c3d16ac97;p=p5sagit%2Fp5-mst-13.2.git

mark 450_service.t#18 as a todo test on windows

p4raw-id: //depot/perl@19724
---

diff --git a/lib/Net/Ping/t/450_service.t b/lib/Net/Ping/t/450_service.t
index c41b84b..006bf64 100644
--- a/lib/Net/Ping/t/450_service.t
+++ b/lib/Net/Ping/t/450_service.t
@@ -19,7 +19,7 @@ use Net::Ping;
 # for the TCP Server stuff instead of doing
 # all that direct socket() junk manually.
 
-plan tests => 26;
+plan tests => 26, ($^O eq 'MSWin32' ? (todo => [18]) : ());
 
 # Everything loaded fine
 ok 1;