[perl #75434] tests available

[kyleha]

This is an automatically generated mail to inform you that tests are now 
available in at least one of these files: 
t/spec/S12-methods/parallel-dispatch.t, t/spec/packages/ContainsUnicode.pm

commit 9b5d136c93293e3dd9e66bc7395f1960ee26b229
Author: moritz <mor...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date:   Sun Jun 6 09:27:54 2010 +0000

    [t/spec] test for RT #75434, guillemot not parsed in modules
    
    git-svn-id: http://svn.pugscode.org/p...@31144 
c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/S12-methods/parallel-dispatch.t 
b/t/spec/S12-methods/parallel-dispatch.t
index 4948bd3..32ece93 100644
--- a/t/spec/S12-methods/parallel-dispatch.t
+++ b/t/spec/S12-methods/parallel-dispatch.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 38;
+plan 39;
 
 # L<S12/"Parallel dispatch"/"Any of the method call forms may be turned into a 
hyperoperator">
 # syn r14547
@@ -124,4 +124,12 @@ class Bar is Foo {
         '3|6', '>>.<a>';
 }
 
+{
+    BEGIN { @*INC.push: 't/spec/packages' };
+    use ContainsUnicode;
+    is uc-and-join('foo', 'bar'), 'FOO, BAR',
+        'parallel dispatch with » works in modules too';
+
+}
+
 # vim: ft=perl6
diff --git a/t/spec/packages/ContainsUnicode.pm 
b/t/spec/packages/ContainsUnicode.pm
new file mode 100644
index 0000000..1f3c25c
--- /dev/null
+++ b/t/spec/packages/ContainsUnicode.pm
@@ -0,0 +1,7 @@
+module ContainsUnicode {
+    sub uc-and-join(*...@things, :$separator = ', ') is export {
+        @things».uc.join($separator)
+    }
+}
+
+# vim: ft=perl6