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 (file)
--- 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;