Commits

Anonymous committed 249bbe5

Fixed a -w flag warning in FS.pm.

Comments (0)

Files changed (1)

installer/perl5/Shlomif/Quad/Pres/FS.pm

     my $self = shift;
     
     my $path = shift;
+
+    if (!exists($self->{gid}))
+    {
+        return;
+    }
     
     chown(-1,$self->{'gid'}, $path);
 }