diff options
author | Adam Spiers <stow@adamspiers.org> | 2011-11-22 14:29:52 +0000 |
---|---|---|
committer | Adam Spiers <stow@adamspiers.org> | 2011-11-26 15:10:28 +0000 |
commit | 8960a4f1fbdbb39efad4d53f2a0ffdcda5ecfc1c (patch) | |
tree | d27f5d04610adef1092b28f18e59baa8f1c42ca4 /t | |
parent | 7bef0fb700671841b70b9c9b1da40794c21212e6 (diff) | |
download | stow-8960a4f1fbdbb39efad4d53f2a0ffdcda5ecfc1c.tar.gz |
Add another test to join_paths.t
Diffstat (limited to 't')
-rwxr-xr-x | t/join_paths.t | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/t/join_paths.t b/t/join_paths.t index 37157a5..585cae9 100755 --- a/t/join_paths.t +++ b/t/join_paths.t @@ -9,7 +9,7 @@ use warnings; use Stow::Util qw(join_paths); -use Test::More tests => 13; +use Test::More tests => 14; is( join_paths('a/b/c', 'd/e/f'), @@ -89,3 +89,9 @@ is( '../a2' => 'drop any "./"' ); + +is( + join_paths('a/b/c', '.'), + 'a/b/c' + => '. on RHS' +); |