From beabc8f1b67da39a6da385a0646266ced3584673 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 15 Mar 2024 11:40:57 +0100 Subject: [PATCH] Bug 36328: Add test Signed-off-by: David Cook --- t/Scrubber.t | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/t/Scrubber.t b/t/Scrubber.t index 1b4a9e13d10..1d03ce67629 100755 --- a/t/Scrubber.t +++ b/t/Scrubber.t @@ -1,10 +1,9 @@ #!/usr/bin/perl -use strict; -use warnings; +use Modern::Perl; $| = 1; -use Test::More tests => 29; +use Test::More tests => 30; use Test::Warn; BEGIN { @@ -82,3 +81,5 @@ eval{ if ($@) { pass("Test should have failed on entry of 'Client' and it did. YAY!"); } + +is( C4::Scrubber->new('comment')->scrub('Allow span'), 'Allow span' ); -- 2.30.2