From bc19134b8019a651a469d7c6b175c31a7f20afe0 Mon Sep 17 00:00:00 2001 From: Andy Lester Date: Thu, 19 Dec 2024 23:14:23 -0600 Subject: [PATCH] Add more coverage --- t/boolean.t | 52 +++++++++++++++++++++++++++++++++++++++++++++++++++- 1 file changed, 51 insertions(+), 1 deletion(-) diff --git a/t/boolean.t b/t/boolean.t index 4641ab4..1a71a3e 100644 --- a/t/boolean.t +++ b/t/boolean.t @@ -9,7 +9,7 @@ use Test::More; use lib 't'; use Util; -plan tests => 90; +plan tests => 104; prep_environment(); @@ -103,6 +103,56 @@ NOT: { 'Little Shop of Horrors', ] ); + + _movies_are( + [qw( Murray --not Ramis --not Martin )], + [ + 'Caddyshack', + 'Groundhog Day', + ] + ); + + _movies_are( + [qw( Murray --not Martin --not Ramis )], + [ + 'Caddyshack', + 'Groundhog Day', + ] + ); + + _movies_are( + [qw( Murray --not Martin --not Ramis --not Chase )], + [ + 'Groundhog Day', + ] + ); + + _movies_are( + [qw( Murray --not Martin --not Ramis --not Chase --not Elliott )], + [] + ); + + _movies_are( + [qw( Ramis --not Murray )], + [] + ); + + # Do some --not that aren't there. + _movies_are( + [qw( Murray --not Cher )], + [ + 'Caddyshack', + 'Ghostbusters', + 'Groundhog Day', + 'Little Shop of Horrors', + 'Stripes', + ] + ); + + _movies_are( + [qw( Cher --not Murray )], + [] + ); }