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

This is pretty good, probably could just check for -x, but can't be sure

Browse Source 
if things aren't staying within /tmp or a new value for $tmp.
This commit is contained in:
freesource 2001-10-23 07:06:58 +00:00
parent 41c0e2d114
commit ed2b3a79fb
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

@ -811,7 +811,7 @@ sub command {
(-x $tmp && !-w $tmp) || (-x $tmp && !-w $tmp) ||
(!-x && -w $tmp) (!-x $tmp && -w $tmp)
) { ) {
print STDERR "swim: $tmp is not "; print STDERR "swim: $tmp is not ";
@ -829,7 +829,7 @@ sub command {
print STDERR "/" if !-w $tmp || !-r $tmp; print STDERR "/" if !-w $tmp || !-r $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}/.swimrc\n"; "in $ENV{HOME}/.swim/swimrc\n";
return "tmp not-writable"; return "tmp not-writable";
} }
$commands{"check"} = 1; $commands{"check"} = 1;
@ -861,7 +861,7 @@ sub command {
(-x $tmp && !-w $tmp) || (-x $tmp && !-w $tmp) ||
(!-x && -w $tmp) (!-x $tmp && -w $tmp)
) { ) {
print STDERR "swim: $tmp is not "; print STDERR "swim: $tmp is not ";
@ -879,7 +879,7 @@ sub command {
print STDERR "/" if !-w $tmp || !-r $tmp; print STDERR "/" if !-w $tmp || !-r $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}/.swimrc\n"; "in $ENV{HOME}/.swim/swimrc\n";
return "tmp not-writable"; return "tmp not-writable";
} }