summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorgregor herrmann <gregoa@debian.org>2018-06-24 12:27:57 +0200
committergregor herrmann <gregoa@debian.org>2018-06-24 12:27:57 +0200
commita86fb15de1403613e0259c656e4f118e5b9a3d8e (patch)
tree7b04cd5c6571ac7a2a9f3c8d10ec7ad54cf15854 /t
parent71eef500c86a52bbd201ad279761727d2c2b7faa (diff)
parenta401990c03074623b11001ba3b335b6d8cdb124f (diff)
New upstream version 0.84
Diffstat (limited to 't')
-rw-r--r--t/03.test_get_available_versions.t2
-rw-r--r--t/09.exit_status.t2
-rw-r--r--t/command-help.t2
-rw-r--r--t/http-ua-detect-non-curl.t2
4 files changed, 5 insertions, 3 deletions
diff --git a/t/03.test_get_available_versions.t b/t/03.test_get_available_versions.t
index f7561da..487003f 100644
--- a/t/03.test_get_available_versions.t
+++ b/t/03.test_get_available_versions.t
@@ -140,7 +140,7 @@ __DATA__
<td>5.13.11
<td>Devel</td>
<td>2011-03-20</td>
- <td><a href="http://www.cpan.org/src/perl-5.13.11.tar.gz">perl-5.13.11.tar.gz</a></td>
+ <td><a href="https://www.cpan.org/src/perl-5.13.11.tar.gz">perl-5.13.11.tar.gz</a></td>
</tr>
diff --git a/t/09.exit_status.t b/t/09.exit_status.t
index baf2646..b7b2a9e 100644
--- a/t/09.exit_status.t
+++ b/t/09.exit_status.t
@@ -11,7 +11,7 @@ use Test::More;
use Test::Exception;
use Path::Class;
-my $bin_perlbrew = file(__FILE__)->dir->parent->subdir("bin")->file("perlbrew");
+my $bin_perlbrew = file(__FILE__)->dir->parent->subdir("script")->file("perlbrew");
throws_ok(
sub {
diff --git a/t/command-help.t b/t/command-help.t
index 3600327..b4251af 100644
--- a/t/command-help.t
+++ b/t/command-help.t
@@ -8,7 +8,7 @@ require "test_helpers.pl";
use Test::Spec;
-my $bin_perlbrew = file(__FILE__)->dir->parent->subdir("bin")->file("perlbrew");
+my $bin_perlbrew = file(__FILE__)->dir->parent->subdir("script")->file("perlbrew");
my $perl = $^X;
#
diff --git a/t/http-ua-detect-non-curl.t b/t/http-ua-detect-non-curl.t
index 4d24abb..b20e5c1 100644
--- a/t/http-ua-detect-non-curl.t
+++ b/t/http-ua-detect-non-curl.t
@@ -11,6 +11,8 @@ use File::Which qw(which);
use App::perlbrew;
use Test::More;
+chmod 0755, "$Bin/fake-bin/curl";
+
diag "PATH=$ENV{PATH}";
my $curl_path = which("curl");