summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorModestas Vainius <modestas@vainius.eu>2009-06-29 19:36:28 +0300
committerModestas Vainius <modestas@vainius.eu>2009-06-30 00:53:07 +0300
commit961d75b2c35d7afcf6f7954604f9442db31eec90 (patch)
tree566730d1dca57fa3daecd0392ebfae9f93fbd9db
parent4769644604ccd4a49ca242e3461fffdc37927f1d (diff)
Add absolute path test for canonpath.
Signed-off-by: Modestas Vainius <modestas@vainius.eu>
-rwxr-xr-xt/buildsystems/buildsystem_tests4
1 files changed, 3 insertions, 1 deletions
diff --git a/t/buildsystems/buildsystem_tests b/t/buildsystems/buildsystem_tests
index 0c4fcd5c..e54663c8 100755
--- a/t/buildsystems/buildsystem_tests
+++ b/t/buildsystems/buildsystem_tests
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-use Test::More tests => 227;
+use Test::More tests => 228;
use strict;
use warnings;
@@ -64,6 +64,8 @@ is( $BS_CLASS->canonpath("path/to/../forward/../../somewhere"),
is( $BS_CLASS->canonpath("path/to/../../../somewhere"),
"../somewhere","canonpath no3" );
is( $BS_CLASS->canonpath("./"), ".", "canonpath no4" );
+is( $BS_CLASS->canonpath("/absolute/path/./somewhere/../to/nowhere"),
+ "/absolute/path/to/nowhere", "canonpath no5" );
is( $BS_CLASS->_rel2rel("path/my/file", "path/my"),
"file", "_rel2rel no1" );
is( $BS_CLASS->_rel2rel("path/dir/file", "path/my"),