`id -Gn` might be available where `groups` is not.

[p5sagit/p5-mst-13.2.git] / installperl

diff --git a/installperl b/installperl
index 2db72d4..0ce39bf 100755 (executable)
--- a/installperl
+++ b/installperl
@@ -564,8 +564,6 @@ sub installlib {
                and chmod($name =~ /\.(so|$dlext)$/o ? 0555 : 0444,
                           "$installlib/$name");
        }
-    } elsif (-d $_) {
-       mkpath("$installlib/$name", 1, 0777);
     }
 }