From: Tomas Doran <bobtfish@bobtfish.net>
Date: Thu, 28 Jul 2011 18:52:54 +0000 (+0100)
Subject: Fix server test to work in make test
X-Git-Tag: 5.89003~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=2a1acc71ae813ba9ca5b63a3c65c70fde941c319

Fix server test to work in make test
---

diff --git a/t/aggregate/unit_core_script_server.t b/t/aggregate/unit_core_script_server.t
index 01b2dd2..7cd6fb4 100644
--- a/t/aggregate/unit_core_script_server.t
+++ b/t/aggregate/unit_core_script_server.t
@@ -5,11 +5,13 @@ use FindBin qw/$Bin/;
 use lib "$Bin/../lib";
 
 use File::Temp qw/ tempdir /;
+use Cwd;
 use Test::More;
 use Try::Tiny;
 
 use Catalyst::Script::Server;
 
+my $cwd = getcwd;
 chdir(tempdir(CLEANUP => 1));
 
 my $testopts;
@@ -204,5 +206,7 @@ sub restartopthash {
     return $val;
 }
 
+chdir($cwd);
+
 1;