X-Git-Url: https://git.p6c8.net/devedit.git/blobdiff_plain/02321769f658fbe95c046c17f0c5b4de759d282f..4b6ea0ada25839464b9bd7d2eec2e97567ab1626:/modules/File/Access.pm diff --git a/modules/File/Access.pm b/modules/File/Access.pm index bc1e37d..5bd797c 100644 --- a/modules/File/Access.pm +++ b/modules/File/Access.pm @@ -40,7 +40,7 @@ use base qw(Exporter); sub chgrp($@) { my ($group,@files) = @_; - my $gid = ($group !~ /^\d+$/) ? getgrnam($group): $group; + my $gid = ($group !~ /^\d+$/) ? getgrnam($group) : $group; return unless($gid); return chown(-1,$gid,@files);