From 683752354dcefde30e2ce323f62a27ef47a018e6 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sun, 20 Sep 2009 22:16:56 -0700
Subject: [PATCH] File::Temp::tempdir does not exist.

---
 t/Storage.t | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/t/Storage.t b/t/Storage.t
index 2a4a3840a..ac5f3a1fa 100644
--- a/t/Storage.t
+++ b/t/Storage.t
@@ -18,6 +18,7 @@ use WebGUI::Storage;
 use WebGUI::PseudoRequest;
 
 use File::Spec;
+use File::Temp qw/tempdir/;
 use Test::More;
 use Test::Deep;
 use Test::MockObject;
@@ -519,8 +520,8 @@ is ($privs, "3\n3\n3", '... correct group contents, deep storage subdir');
 #
 ####################################################
 
-my $cdnTestPath = File::Temp::tempdir();
-my $cdnQueueTestPath = File::Temp::tempdir();
+my $cdnTestPath      = tempdir();
+my $cdnQueueTestPath = tempdir();
 
 my $cdnCfg = {
     "enabled"       => 1,