bike/dswim
1
0
Fork 0
mirror of https://github.com/fspc/dswim.git synced 2026-09-10 13:51:41 -04: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
Download Patch File Download Diff File Expand all files Collapse all files
swim
+4 -4
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";