bike/dswim
1
0
Fork 0
mirror of https://github.com/fspc/dswim.git synced 2025-02-22 08:33:24 -05:00
Code Issues Projects Releases Wiki Activity

Just makes sure that / doesn't print when checking rwx and for wx

Browse Source
This commit is contained in:
freesource 2001-10-23 16:47:35 +00:00
parent ed2b3a79fb
commit 92d1ab60b2
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
swim
View File

@ -818,7 +818,7 @@ sub command {
print STDERR "readable" if !-r $tmp; print STDERR "readable" if !-r $tmp;
print STDERR "/" if !-r $tmp && !-w $tmp; print STDERR "/" if !-r $tmp && !-w $tmp;
print STDERR "writable" if !-w $tmp; print STDERR "writable" if !-w $tmp;
print STDERR "/" if !-w $tmp || !-r $tmp; print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
print STDERR "executable" if !-x $tmp; print STDERR "executable" if !-x $tmp;
print STDERR " by your effective uid/gid\n"; print STDERR " by your effective uid/gid\n";
@ -826,7 +826,7 @@ sub command {
print STDERR "readable" if !-r $tmp; print STDERR "readable" if !-r $tmp;
print STDERR "/" if !-r $tmp && !-w $tmp; print STDERR "/" if !-r $tmp && !-w $tmp;
print STDERR "writable" if !-w $tmp; print STDERR "writable" if !-w $tmp;
print STDERR "/" if !-w $tmp || !-r $tmp; print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
print STDERR "executable" if !-x $tmp; print STDERR "executable" if !-x $tmp;
print STDERR " by your effective uid/gid " . print STDERR " by your effective uid/gid " .
"in $ENV{HOME}/.swim/swimrc\n"; "in $ENV{HOME}/.swim/swimrc\n";
@ -868,7 +868,7 @@ sub command {
print STDERR "readable" if !-r $tmp; print STDERR "readable" if !-r $tmp;
print STDERR "/" if !-r $tmp && !-w $tmp; print STDERR "/" if !-r $tmp && !-w $tmp;
print STDERR "writable" if !-w $tmp; print STDERR "writable" if !-w $tmp;
print STDERR "/" if !-w $tmp || !-r $tmp; print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
print STDERR "executable" if !-x $tmp; print STDERR "executable" if !-x $tmp;
print STDERR " by your effective uid/gid\n"; print STDERR " by your effective uid/gid\n";
@ -876,7 +876,7 @@ sub command {
print STDERR "readable" if !-r $tmp; print STDERR "readable" if !-r $tmp;
print STDERR "/" if !-r $tmp && !-w $tmp; print STDERR "/" if !-r $tmp && !-w $tmp;
print STDERR "writable" if !-w $tmp; print STDERR "writable" if !-w $tmp;
print STDERR "/" if !-w $tmp || !-r $tmp; print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
print STDERR "executable" if !-x $tmp; print STDERR "executable" if !-x $tmp;
print STDERR " by your effective uid/gid " . print STDERR " by your effective uid/gid " .
"in $ENV{HOME}/.swim/swimrc\n"; "in $ENV{HOME}/.swim/swimrc\n";