[Moose-commits] r7338 - MooseX-AttributeHelpers/branches/og-contains+docs/t

oliver at code2.0beta.co.uk oliver at code2.0beta.co.uk
Sun Jan 18 09:42:11 GMT 2009


Author: oliver
Date: 2009-01-18 01:42:11 -0800 (Sun, 18 Jan 2009)
New Revision: 7338

Modified:
   MooseX-AttributeHelpers/branches/og-contains+docs/t/005_basic_list.t
Log:
add whitespace for clarity

Modified: MooseX-AttributeHelpers/branches/og-contains+docs/t/005_basic_list.t
===================================================================
--- MooseX-AttributeHelpers/branches/og-contains+docs/t/005_basic_list.t	2009-01-18 03:44:18 UTC (rev 7337)
+++ MooseX-AttributeHelpers/branches/og-contains+docs/t/005_basic_list.t	2009-01-18 09:42:11 UTC (rev 7338)
@@ -102,13 +102,16 @@
 
 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');
 




More information about the Moose-commits mailing list