#!/usr/bin/perl
use strict;
use Modern::Perl;
use warnings;
$| = 1;
use Test::More tests => 29;
use Test::More tests => 30;
use Test::Warn;
BEGIN {
if ($@) {
pass("Test should have failed on entry of 'Client' and it did. YAY!");
}
-
is( C4::Scrubber->new('comment')->scrub('<span>Allow span</span>'), '<span>Allow span</span>' );