Merge pull request #140 from tmancill/startup-vars

warn user when short-circuiting initialisation
duncs · Jun 29, 2021 · 70b4731 · 70b4731
2 parents 6cbec68 + 0b5b5c8
commit 70b4731
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/lib/App/ClusterSSH/Window.pm b/lib/App/ClusterSSH/Window.pm
@@ -29,7 +29,10 @@ sub import {
 
     # If we are building or in test here, just exit
     # as travis build servers will not have Tk installed
-    return if $ENV{AUTHOR_TESTING} || $ENV{RELEASE_TESTING};
+    if ($ENV{AUTHOR_TESTING} || $ENV{RELEASE_TESTING}) {
+        print STDERR "skipping initialisation; AUTHOR_TESTING or RELEASE_TESTING are set\n";
+        return;
+    }
 
     # Find what windows module we should be using and just overlay it into
     # this object