X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=util%2Fperlpath.pl;h=a1f236bd9843cf69490c72c532129f9ced4d9d0a;hb=993ea851f56b022feaa41308093792cb3a609a48;hp=0aa5ada36768b0d7896e3f583e8cb1d3b3e54c00;hpb=b7896b3cb86d80206af14a14d69b0717786f2729;p=oweals%2Fopenssl.git diff --git a/util/perlpath.pl b/util/perlpath.pl index 0aa5ada367..a1f236bd98 100755 --- a/util/perlpath.pl +++ b/util/perlpath.pl @@ -17,7 +17,12 @@ sub wanted @a=; close(IN); - $a[0]="#!$ARGV[0]/perl\n"; + if (-d $ARGV[0]) { + $a[0]="#!$ARGV[0]/perl\n"; + } + else { + $a[0]="#!$ARGV[0]\n"; + } # Playing it safe... $new="$_.new";