From b4483947cfbe3079b679efa6dd4c695d0aeb7340 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sat, 9 Feb 2008 04:25:07 +0000
Subject: [PATCH] take advantage of getTestCollateralPath concatenating files
 to the path for you

---
 t/Storage.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/Storage.t b/t/Storage.t
index 34e8dc8ad..ad5266400 100644
--- a/t/Storage.t
+++ b/t/Storage.t
@@ -377,7 +377,7 @@ is($fileStore->addFileFromFormPost('files'), undef, 'addFileFromFormPost returns
 
 $session->request->uploadFiles(
     'oneFile',
-    [ File::Spec->catfile( WebGUI::Test->getTestCollateralPath, qw/WebGUI.pm/) ],
+    [ WebGUI::Test->getTestCollateralPath('WebGUI.pm') ],
 );
 is($fileStore->addFileFromFormPost('oneFile'), 'WebGUI.pm', 'Return the name of the uploaded file');