diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-01 15:14:42 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-02-01 15:14:51 -0700 |
commit | c1aabf33bd7f70298ea977b0e20dc262a92bde2b (patch) | |
tree | ec3b3a36d56e1eb2fca983d5b542abac0904094e /t | |
parent | f48595c3d891765cf4d20cf5a9a829c3ab295cb5 (diff) | |
download | p5-Git-Annex-c1aabf33bd7f70298ea977b0e20dc262a92bde2b.tar.gz |
_git_path does an implicit catfile
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 't')
-rwxr-xr-x | t/11_utils.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/t/11_utils.t b/t/11_utils.t index f982967..d7343bc 100755 --- a/t/11_utils.t +++ b/t/11_utils.t @@ -16,7 +16,8 @@ with_temp_annexes { my $temp = shift; my $annex = Git::Annex->new("source1"); my $unused_info = catfile($temp, qw(source1 .git annex unused_info)); - ok $annex->_git_path("blah") eq catfile($temp, qw(source1 .git blah)), + ok $annex->_git_path("blah", "foo") + eq catfile($temp, qw(source1 .git blah foo)), "_git_path resolves a path"; ok $annex->_unused_cache eq $unused_info, "_unused_cache resolves to correct path"; |