biology/bcftools/files/patch-test_test.pl

   1 --- test/test.pl.orig   2017-10-18 09:33:24 UTC
   2 +++ test/test.pl
   3 @@ -381,7 +381,7 @@ sub _cmd
   4      else
   5      {
   6          # child
   7 -        exec('/bin/bash', '-o','pipefail','-c', $cmd) or error("Cannot execute the command [/bin/sh -o pipefail -c $cmd]: $!");
   8 +        exec('/usr/local/bin/bash', '-o','pipefail','-c', $cmd) or error("Cannot execute the command [/usr/local/bin/sh -o pipefail -c $cmd]: $!");
   9      }
  10      return ($? >> 8, join('',@out));
  11  }
  12 @@ -782,7 +782,7 @@ sub test_usage
  13      my $command = $args{cmd};
  14      my $commandpath = $$opts{bin}."/".$command;
  15      my ($ret,$out) = _cmd("$commandpath $args{redirection} 2>&1");
  16 -    if ( $out =~ m/\/bin\/bash.*no.*such/i ) { failed($opts,$test,"could not run $commandpath: $out"); return; }
  17 +    if ( $out =~ m/\/usr\/local\/bin\/bash.*no.*such/i ) { failed($opts,$test,"could not run $commandpath: $out"); return; }
  18
  19      my @sections = ($out =~ m/(^[A-Za-z]+.*?)(?:(?=^[A-Za-z]+:)|\z)/msg);
  20
  21 @@ -833,7 +833,7 @@ sub test_usage_subcommand
  22      my $subcommand = $args{subcmd};
  23      my $commandpath = $$opts{bin}."/".$command;
  24      my ($ret,$out) = _cmd("$commandpath $subcommand $args{redirection} 2>&1");
  25 -    if ( $out =~ m/\/bin\/bash.*no.*such/i ) { failed($opts,$test,"could not run $commandpath $subcommand: $out"); return; }
  26 +    if ( $out =~ m/\/usr\/local\/bin\/bash.*no.*such/i ) { failed($opts,$test,"could not run $commandpath $subcommand: $out"); return; }
  27
  28      my @sections = ($out =~ m/(^[A-Za-z]+.*?)(?:(?=^[A-Za-z]+:)|\z)/msg);
  29