X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fatom.t;h=37d6d09c2c7191940643494b114ab74339d4f021;hb=1ff94f744944764df3f541f7caf739180e90e17b;hp=bb50e26f02ea606f8b8c822cee339ea3a338795f;hpb=4dacb4b2dd8b8054fea25101eec329fe5f4a9de2;p=catagits%2FGitalist.git

diff --git a/t/atom.t b/t/atom.t
index bb50e26..37d6d09 100644
--- a/t/atom.t
+++ b/t/atom.t
@@ -1,6 +1,12 @@
 #!/usr/bin/env perl
 use FindBin qw/$Bin/;
-BEGIN { do "$FindBin::Bin/../script/env" or die $@ }
+BEGIN {
+    my $env = "$FindBin::Bin/../script/env";
+    if (-r $env) {
+        do $env or die $@;
+    }
+}
+
 use lib "$Bin/lib";
 use TestGitalist;
 use HTTP::Request::Common;