Wrong test case for !n

[bokutin]

Search-Query-Dialect-DBIxClass/t/02_search.t

Line 48 in 7d21339

my $rs_query = Person->search_rs( $parser->parse('!n')->as_dbic_query );

% sqd '!n'
!n
 => -n

% perl -E 'use Search::Query; say Search::Query->parser( default_field => [qw(name email)], fields => [qw(name email)], dialect => "SQL" )->parse("!n")'
NOT (name='n' OR email='n')

Search-Query-Dialect-DBIxClass/t/02_search.t

Lines 49 to 57 in 7d21339

	my $rs_expected = Person->search_rs(
	[ \[ "COALESCE( LOWER(name), '' ) NOT LIKE ?",
	[ plain_value => "%n%" ]
	],
	\[ "COALESCE( LOWER(email), '' ) NOT LIKE ?",
	[ plain_value => "%n%" ]
	],
	]
	);

above $rs_expected->count is 4.
The same query as "NOT (name='n' OR email='n')" could be the following.

my $rs_expected = Person->search_rs(
    {
        -not => {
            -or => [
                \[  "COALESCE( LOWER(name), '' ) LIKE ?",
                    [ plain_value => "%n%" ]
                ],
                \[  "COALESCE( LOWER(email), '' ) LIKE ?",
                    [ plain_value => "%n%" ]
                ],
            ]
        }
    ]
);

above $rs_expected->count is 3.