Browse files

Apply Michael Costello's suggestion to avoid the root check on cygwin.

Bump the version for a new release.
  • Loading branch information...
1 parent 0278194 commit ae66fe8e558772db1cf3a16ab1c6b284433138af @rcaputo committed May 20, 2006
Showing with 4 additions and 2 deletions.
  1. +4 −2 Ping.pm
View
6 Ping.pm
@@ -24,7 +24,7 @@ use vars qw(@ISA @EXPORT_OK %EXPORT_TAGS);
);
use vars qw($VERSION $PKTSIZE);
-$VERSION = '1.10';
+$VERSION = '1.11';
$PKTSIZE = $^O eq 'linux' ? 3_000 : 100;
use Carp qw(croak);
@@ -49,7 +49,9 @@ sub spawn {
my %params = @_;
croak "$type requires root privilege" if (
- $> and ($^O ne "VMS") and not defined $params{Socket}
+ $> and ($^O ne "VMS") and
+ ($^O ne "cygwin") and
+ not defined $params{Socket}
);
my $alias = delete $params{Alias};

0 comments on commit ae66fe8

Please sign in to comment.