remove rel2abs
authorGabor Szabo <gabor@szabgab.com>
Tue, 29 Nov 2011 15:48:16 +0000 (17:48 +0200)
committerGabor Szabo <gabor@szabgab.com>
Tue, 29 Nov 2011 15:48:16 +0000 (17:48 +0200)
t/test.pm

index f49d0c9..e588df5 100644 (file)
--- a/t/test.pm
+++ b/t/test.pm
@@ -114,14 +114,6 @@ use Test                    1.122 qw( ok skip );
 
 # ----------------------------------------------------------------------------
 
-sub rel2abs {
-  if ( File::Spec->file_name_is_absolute($_[0]) ) {
-    return $_[0];
-  } else {
-    return File::Spec->catdir(cwd, $_[0]);
-  }
-}
-
 # -------------------------------------
 # PACKAGE CONSTANTS
 # -------------------------------------