citrun

commit 519bec9d0b1fbeafe69fa3e091026a1d5005236d
parent 3f6e3e00aeac9d5dab634436750b13888704f891
Author: Kyle Milz <kyle@0x30.net>
Date:   Fri,  1 Jul 2016 14:07:52 -0600

Test/Package: set CITRUN_SOCKET higher

Diffstat:
M
Test/Package.pm
 | 
6
+++---

1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/Test/Package.pm b/Test/Package.pm
@@ -11,6 +11,9 @@ sub new {
 	my $self = {};
 	bless($self, $class);
 
+	# Always set this so we never try to connect to a real viewer.
+	$ENV{CITRUN_SOCKET} = getcwd . "/citrun-test.socket";
+
 	return $self if (! defined ($dist_name));
 	$self->{dist_name} = $dist_name;
 
@@ -27,9 +30,6 @@ sub new {
 	my $abs_dist_path = getcwd . "/distfiles/$dist_name";
 	system("cd $dir && $extract_cmd $abs_dist_path") == 0 or die "extract failed";
 
-	# Always set this so we never try to connect to a real viewer.
-	$ENV{CITRUN_SOCKET} = getcwd . "/citrun-test.socket";
-
 	return $self;
 }