From bf5e674d91a21dcc702f793534dec28f00cd0d35 Mon Sep 17 00:00:00 2001
From: Greg Sabino Mullane <greg@endpoint.com>
Date: Sun, 4 Sep 2011 23:30:16 -0400
Subject: [PATCH] We don't need a second eval/alarm: the inner ctl() sub
 already does that now.

---
 t/BucardoTesting.pm | 13 +------------
 1 file changed, 1 insertion(+), 12 deletions(-)

diff --git a/t/BucardoTesting.pm b/t/BucardoTesting.pm
index 7c2deae07..a8cd0d8f0 100644
--- a/t/BucardoTesting.pm
+++ b/t/BucardoTesting.pm
@@ -979,18 +979,7 @@ sub setup_bucardo {
 
     ## Now run the install. Timeout after a few seconds
     debug(qq{Running bucardo install on cluster $clustername});
-    my $info;
-    eval {
-        local $SIG{ALRM} = sub { die "Alarum!\n"; };
-        alarm 5;
-        $info = $self->ctl('install --batch');
-        alarm 0;
-    };
-    if ($@ =~ /Alarum/ or $info =~ /Alarum/) {
-        warn "bucardo install never finished!\n";
-        exit;
-    }
-    $@ and die $@;
+    my $info = $self->ctl('install --batch');
 
     if ($info !~ /Installation is now complete/) {
         die "Installation failed: $info\n";
-- 
2.39.5