Skip to content
Permalink
Browse files

Pass an absolutified path to CWD

Fixes a weird spectest failure in t/spec/S12-meta/exporthow.t
===SORRY!===
Type check failed in binding to parameter '$CWD'; expected Str but got IO::Path (IO::Path.new("/Users/ugexe/re...)
  • Loading branch information...
ugexe committed Sep 28, 2018
1 parent 3a68cc9 commit 339ea8507698a0fd57ffc5bbd9476e2d4b608f7a
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/core/Distribution.pm6
@@ -78,7 +78,7 @@ role Distribution {
role Distribution::Locally does Distribution {
has IO::Path $.prefix;
method content($address) {
my $handle = IO::Handle.new: path => IO::Path.new($address, :CWD($!prefix // $*CWD));
my $handle = IO::Handle.new: path => IO::Path.new($address, :CWD($!prefix.absolute // $*CWD.absolute));
$handle // $handle.throw;
}
}

0 comments on commit 339ea85

Please sign in to comment.
You can’t perform that action at this time.