Skip to content

Commit

Permalink
[io grant] Test return type of IO::Spec::Unix.path
Browse files Browse the repository at this point in the history
  • Loading branch information
zoffixznet committed May 15, 2017
1 parent fb61306 commit 7266522
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions S32-io/io-spec-unix.t
Original file line number Diff line number Diff line change
Expand Up @@ -80,10 +80,9 @@ nok $Unix.is-absolute( '..' ), 'is-absolute: nok ".."';
my $path = %*ENV<PATH>;
%*ENV<PATH> = '/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:';
my @want = </usr/local/sbin /usr/local/bin /usr/sbin /usr/bin /sbin /bin /usr/games .>;
is $Unix.path, @want, 'path';
is-deeply $Unix.path, @want.Seq, 'path';
%*ENV<PATH> = '';
my @empty;
is $Unix.path, @empty, 'no path';
is-deeply $Unix.path, ().Seq, 'no path';
%*ENV<PATH> = $path;

my %splitpath = (
Expand Down

0 comments on commit 7266522

Please sign in to comment.