simplify IPC::Run check (same behavior)

1 files changed, 9 insertions, 13 deletions

diff --git a/t/relativity.t b/t/relativity.t
index 300c6e61d..7e1e7049f 100755
--- a/t/relativity.t
+++ b/t/relativity.t
@@ -2,21 +2,17 @@
 use warnings;
 use strict;
 
-use Cwd qw(getcwd);
-use Errno qw(ENOENT);
-
-BEGIN {
-	if (!eval q{
+use Test::More;
+plan(skip_all => "IPC::Run not available")
+	unless eval q{
 		use IPC::Run qw(run);
 		1;
-	}) {
-		eval q{use Test::More skip_all => "IPC::Run not available"};
-	}
-	else {
-		eval q{use Test::More};
-	}
-	use_ok("IkiWiki");
-}
+	};
+
+use IkiWiki;
+
+use Cwd qw(getcwd);
+use Errno qw(ENOENT);
 
 my $PERL5LIB = 'blib/lib:blib/arch';
 my $pwd = getcwd();