X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fprefetch%2Fdiamond.t;h=f7a21e037ffe42a04d4a760d1c56ffdb256f4c51;hb=4b8a53eabdb1629bacdb95f04ca8fc3718ca7c58;hp=0de8009abc3ffad59ccb1a23adaf8bbeb2ebd32f;hpb=9f6555d31bc48b6fa3792f74368fc1f17f77ea60;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/prefetch/diamond.t b/t/prefetch/diamond.t
index 0de8009..f7a21e0 100644
--- a/t/prefetch/diamond.t
+++ b/t/prefetch/diamond.t
@@ -31,18 +31,28 @@ my $ars = $schema->resultset ('Artwork');
 # The current artwork belongs to a cd by artist1
 # but the artwork itself is painted by artist2
 #
-# What we try is all possible permutations of join/prefetch 
+# What we try is all possible permutations of join/prefetch
 # combinations in both directions, while always expecting to
 # arrive at the specific artist at the end of each path.
 
 
 my $cd_paths = {
   'no cd' => [],
+  'no cd empty' => [ '' ],
+  'no cd undef' => [ undef ],
+  'no cd href' => [ {} ],
+  'no cd aoh' => [ [{}] ],
+  'no cd complex' => [ [ [ undef ] ] ],
   'cd' => ['cd'],
   'cd->artist1' => [{'cd' => 'artist'}]
 };
 my $a2a_paths = {
   'no a2a' => [],
+  'no a2a empty ' => [ '' ],
+  'no a2a undef' => [ undef ],
+  'no a2a href' => [ {} ],
+  'no a2a aoh' => [ [{}] ],
+  'no a2a complex' => [ [ '' ] ],
   'a2a' => ['artwork_to_artist'],
   'a2a->artist2' => [{'artwork_to_artist' => 'artist'}]
 };