From d58d34967abc31ad7d22a71aa5e15d407d77799a Mon Sep 17 00:00:00 2001
From: James Raspass <jraspass@gmail.com>
Date: Sun, 21 Aug 2022 20:48:21 +0100
Subject: Replace raw TAP printing with "Test::More"

---
 t/clone.t | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

(limited to 't/clone.t')

diff --git a/t/clone.t b/t/clone.t
index 6eb15eb..f80091c 100644
--- a/t/clone.t
+++ b/t/clone.t
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-print "1..2\n";
+use Test::More tests => 2;
 
 use URI::URL ();
 
@@ -14,8 +14,6 @@ $u1->base("http://yyy/");
 
 #use Data::Dump; Data::Dump::dump($b, $u1, $u2);
 
-print "not " unless $u1->abs->as_string eq "http://yyy/foo";
-print "ok 1\n";
+is $u1->abs->as_string, "http://yyy/foo";
 
-print "not " unless $u2->abs->as_string eq "http://www/foo";
-print "ok 2\n";
+is $u2->abs->as_string, "http://www/foo";
-- 
cgit v1.2.1