From 13b8afa038e95d5751a619d296354b974f659ffc Mon Sep 17 00:00:00 2001
From: Tony Cook <tony@develop=help.com>
Date: Sat, 30 Mar 2002 22:49:22 +0000
Subject: [PATCH] disable the alarm after the test

---
 t/t20fill.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/t/t20fill.t b/t/t20fill.t
index 45ac7665..025f3453 100644
--- a/t/t20fill.t
+++ b/t/t20fill.t
@@ -252,8 +252,9 @@ ok($testnum++,
                   fill=>{ fountain=>'linear', xa=>20, ya=>20, xb=>80, 
                           yb=>20 }), "linear box fill");
     ++$testnum;
+    alarm 0;
   };
-  $@ and ok($testnum++, 0, "linear box fill alarmed");
+  $@ and ok($testnum++, 0, "linear box fill $@");
 }
 
 sub ok ($$$) {
-- 
2.39.5