X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2F_Util.pm;h=e281b66807f4d3674c5ae48c0d9c7bdc3f0d9464;hb=facd0e8e687648e52f29df73d62d9c993b9b19d1;hp=0ab7ac9261c5487614e0f1a6e30ce2dcae04a353;hpb=7edb97b0949d66fd79e6f222e08da56cd5ca92fd;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/_Util.pm b/lib/DBIx/Class/_Util.pm index 0ab7ac9..e281b66 100644 --- a/lib/DBIx/Class/_Util.pm +++ b/lib/DBIx/Class/_Util.pm @@ -59,8 +59,11 @@ our @EXPORT_OK = qw( sigwarn_silencer modver_gt_or_eq fail_on_internal_wantarray refcount hrefaddr is_exception is_plain_value is_literal_value + UNRESOLVABLE_CONDITION ); +use constant UNRESOLVABLE_CONDITION => \ '1 = 0'; + sub sigwarn_silencer ($) { my $pattern = shift;