From ea872aef7300e333f5db9b3e7ed05d40f176a912 Mon Sep 17 00:00:00 2001
From: Russ Allbery <rra@stanford.edu>
Date: Wed, 19 Sep 2007 22:48:56 +0000
Subject: Skip the unchanging tests if Net::Remctl isn't available.

---
 perl/t/keytab.t | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perl/t')

diff --git a/perl/t/keytab.t b/perl/t/keytab.t
index 88a40a9..b8b6a6b 100755
--- a/perl/t/keytab.t
+++ b/perl/t/keytab.t
@@ -317,6 +317,8 @@ SKIP: {
     my @path = (split (':', $ENV{PATH}), '/usr/local/sbin', '/usr/sbin');
     my ($remctld) = grep { -x $_ } map { "$_/remctld" } @path;
     skip 'remctld not found', 16 unless $remctld;
+    eval { require Net::Remctl };
+    skip 'Net::Remctl not available', 16 if $@;
 
     # Set up our configuration.
     $Wallet::Config::KEYTAB_FILE      = 't/data/test.keytab';
-- 
cgit v1.2.3