tange/parallel
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/parallel.git synced 2024-12-23 13:17:54 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

parallel: Fixed bug #43967: Error if there exists a bin/zsh or bin/bash dir (with zsh or bash).

Browse source
This commit is contained in:
Ole Tange 2015-01-18 21:54:43 +01:00
parent 29ce26de3f
commit 38b214971e
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/parallel
View file

@ -3141,7 +3141,8 @@ sub which {
# @full_path = full paths to @programs. Nothing if not found # @full_path = full paths to @programs. Nothing if not found
my @which; my @which;
for my $prg (@_) { for my $prg (@_) {
push @which, map { $_."/".$prg } grep { -x $_."/".$prg } split(":",$ENV{'PATH'}); push @which, grep { not -d $_ and -x $_ }
map { $_."/".$prg } split(":",$ENV{'PATH'});
} }
return @which; return @which;
} }