From 961d75b2c35d7afcf6f7954604f9442db31eec90 Mon Sep 17 00:00:00 2001 From: Modestas Vainius Date: Mon, 29 Jun 2009 19:36:28 +0300 Subject: [PATCH] Add absolute path test for canonpath. Signed-off-by: Modestas Vainius --- t/buildsystems/buildsystem_tests | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/t/buildsystems/buildsystem_tests b/t/buildsystems/buildsystem_tests index 0c4fcd5..e54663c 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"), -- 2.39.2