JehanneOS
/
mksh
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Consider an OS/2-style absolute path when testing 

x:* and \* are absolute paths on OS/2 as well as /*.
This commit is contained in:
KO Myung-Hun 2015-05-13 16:04:04 +09:00
parent 4076b74ae8
commit fc17d48a59
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
check.pl
View File

@ -312,7 +312,10 @@ die "$prog: couldn't get temporary directory\n" if $temp_dir eq '';
die "$prog: couldn't cd to $pwd - $!\n" if !chdir($pwd);
if (!$program_kludge) {
$test_prog = "$pwd/$test_prog" if substr($test_prog, 0, 1) ne '/';
$test_prog = "$pwd/$test_prog"
if substr($test_prog, 0, 1) ne '/' &&
($os ne 'os2' || (substr($test_prog, 0, 1) ne '\\' &&
substr($test_prog, 1, 1) ne ':'));
die "$prog: $test_prog is not executable - bye\n"
if (! -x $test_prog && $os ne 'os2');
}