projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug fix to #73185, discovered via #71513
[freeside.git]
/
rt
/
t
/
customfields
/
ipv6.t
diff --git
a/rt/t/customfields/ipv6.t
b/rt/t/customfields/ipv6.t
index
f97420e
..
24f7c2a
100644
(file)
--- a/
rt/t/customfields/ipv6.t
+++ b/
rt/t/customfields/ipv6.t
@@
-26,7
+26,7
@@
my $cf;
diag "load and check basic properties of the IP CF" if $ENV{'TEST_VERBOSE'};
{
my $cfs = RT::CustomFields->new($RT::SystemUser);
diag "load and check basic properties of the IP CF" if $ENV{'TEST_VERBOSE'};
{
my $cfs = RT::CustomFields->new($RT::SystemUser);
- $cfs->Limit( FIELD => 'Name', VALUE => 'IP' );
+ $cfs->Limit( FIELD => 'Name', VALUE => 'IP'
, CASESENSITIVE => 0
);
is( $cfs->Count, 1, "found one CF with name 'IP'" );
$cf = $cfs->First;
is( $cfs->Count, 1, "found one CF with name 'IP'" );
$cf = $cfs->First;
@@
-150,7
+150,7
@@
diag "check that we parse correct IPs only" if $ENV{'TEST_VERBOSE'};
}
);
}
);
- $agent->content_contains( '
can not be parsed as an
IP address',
+ $agent->content_contains( '
is not a valid
IP address',
'ticket fails to create' );
}
}
'ticket fails to create' );
}
}
@@
-246,8
+246,8
@@
diag "create a ticket with an IP of abcd:23:: and search for doesn't match 'abcd
$tickets->FromSQL("id=$id AND CF.{IP} NOT LIKE 'abcd:23'");
} [qr/not a valid IPAddress/], "caught warning about IPAddress";
$tickets->FromSQL("id=$id AND CF.{IP} NOT LIKE 'abcd:23'");
} [qr/not a valid IPAddress/], "caught warning about IPAddress";
-
SKIP
: {
-
skip "partical ip parse can causes ambiguity", 1
;
+
TODO
: {
+
local $TODO = "partial ip parse can causes ambiguity"
;
is( $tickets->Count, 0, "should not have found the ticket" );
}
}
is( $tickets->Count, 0, "should not have found the ticket" );
}
}