Darwin's groups can have spaces in them
authorJosh ben Jore <jjore@cpan.org>
Sun, 11 Oct 2009 05:36:52 +0000 (22:36 -0700)
committerJosh ben Jore <jjore@cpan.org>
Sun, 11 Oct 2009 05:36:52 +0000 (22:36 -0700)
t/op/groups.t

index 404b8cd..0ef15ad 100644 (file)
@@ -137,7 +137,7 @@ for (split(' ', $()) {
 print "# gr = @gr\n";
 
 my %did;
-if ($^O =~ /^(?:uwin|cygwin|interix|solaris|linux)$/) {
+if ($^O =~ /^(?:uwin|cygwin|interix|solaris|linux|darwin)$/) {
        # Or anybody else who can have spaces in group names.
        $gr1 = join(' ', grep(!$did{$_}++, sort split(' ', join(' ', @gr))));
 } else {