bike
/
dswim
mirror of https://github.com/fspc/dswim
1
0
Fork 0
Code Issues Projects Releases Wiki Activity
Browse Source

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

master
freesource 23 years ago
parent
ed2b3a79fb
commit
92d1ab60b2
1 changed files with 4 additions and 4 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 8
      swim

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";

Write Preview
Loading…
Cancel
Save