From: Tomas Doran <bobtfish@bobtfish.net>
Date: Wed, 2 Nov 2011 15:41:33 +0000 (+0000)
Subject: Regex version still fails
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalystX-HelpText.git;a=commitdiff_plain;h=83a34a144e65b369a5d21eb5935ec8aa9bd14521

Regex version still fails
---

diff --git a/t/lib/TestApp/root/difficult b/t/lib/TestApp/root/difficult
index 02c35e9..c6711f4 100644
--- a/t/lib/TestApp/root/difficult
+++ b/t/lib/TestApp/root/difficult
@@ -1,3 +1,4 @@
+[% help_text("one"); help_text("two"); %]
 [% help_text("undocumented") %]
 [% help_text(no_pass) %]
 [%
@@ -5,4 +6,4 @@
   help_text  ( "pass");
   help_text( 'pass' );
   help_text  ( 'pass');
-%]
\ No newline at end of file
+%]
diff --git a/t/script.t b/t/script.t
index 34d336c..06c0e90 100644
--- a/t/script.t
+++ b/t/script.t
@@ -33,9 +33,9 @@ foreach my $suffix ('', '::Regexp') {
         $path.'helptext/fnoo.html',
     );
     is_deeply [ sort $script->all_files->flatten ], [ sort @files ], "Files found for class '$class'" or diag Dumper($script->all_files);
-    is_deeply [ sort $script->all_keys->flatten ], [ sort 'undocumented', 'fnoo', 'pass' ], "All keys found for class '$class'" or diag Dumper($script->all_keys);
-    is_deeply [ sort $script->undocumented_keys->flatten ], [ sort 'undocumented', 'pass' ], "undocumented keys found for class '$class'"  or diag Dumper($script->undocumented_keys);
-    is_deeply [ sort $script->documented_keys->flatten ], [ sort 'fnoo' ], "documented keys found for class '$class'"  or diag Dumper($script->documented_keys);
+    is_deeply [ sort $script->all_keys->flatten ], [ sort 'undocumented', 'fnoo', 'one', 'two', 'pass', ], "All keys found for class '$class'" or diag Dumper($script->all_keys);
+    is_deeply [ sort $script->undocumented_keys->flatten ], [ sort 'one', 'two', 'undocumented', 'pass' ], "undocumented keys found for class '$class'"  or diag Dumper($script->undocumented_keys);
+    is_deeply [ sort $script->documented_keys->flatten ], [ sort 'fnoo', ], "documented keys found for class '$class'"  or diag Dumper($script->documented_keys);
 }
 
 done_testing;