From: oliver Date: Sun, 18 Jan 2009 09:42:11 +0000 (+0000) Subject: add whitespace for clarity X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d7fc3bfd90391f88a47462e242d29583425f9813;p=gitmo%2FMooseX-AttributeHelpers.git add whitespace for clarity --- diff --git a/t/005_basic_list.t b/t/005_basic_list.t index f8a16c9..a759e37 100644 --- a/t/005_basic_list.t +++ b/t/005_basic_list.t @@ -102,13 +102,16 @@ is_deeply([ $stuff->options ], [1 .. 10], '... got the list of options'); is($stuff->join_options(':'), '1:2:3:4:5:6:7:8:9:10', '... joined the list of options by :'); -is($stuff->options_contains(),0,'... does not contain undef'); -is($stuff->options_contains(5),1,'... contains "5"'); -is($stuff->options_contains(11),0,'... does not contain "11"'); +is($stuff->options_contains(), 0 ,'... does not contain undef'); +is($stuff->options_contains(5), 1 ,'... contains "5"'); +is($stuff->options_contains(11), 0 ,'... does not contain "11"'); + push @{$stuff->_options}, undef; -is($stuff->options_contains(undef),1,'... does contain undef'); +is($stuff->options_contains(undef), 1 ,'... does contain undef'); + push @{$stuff->_options}, 5; -is($stuff->options_contains(5),2,'... contains returns count'); +is($stuff->options_contains(5), 2 ,'... contains returns count'); + splice @{$stuff->_options}, -2; is_deeply($stuff->_options, [1 .. 10], '... reset list for regression');