Debugging why sqlt deployment order of views is wrong.

[dbsrgits/DBIx-Class-ResultSource-MultipleTableInheritance.git] / t / lib / CafeInsertion.pm

diff --git a/t/lib/CafeInsertion.pm b/t/lib/CafeInsertion.pm
index 73ff34f..034dbdb 100644 (file)
--- a/t/lib/CafeInsertion.pm
+++ b/t/lib/CafeInsertion.pm
@@ -1,4 +1,5 @@
-package CafeInsertion;
+package # hide from PAUSE
+       CafeInsertion;
 
 use strict;
 use warnings;
@@ -11,4 +12,9 @@ for my $p (__PACKAGE__) {
     for grep $_->isa(MTIView), map $p->source($_), $p->sources;
 }
 
+sub sqlt_deploy_hook {
+  my $self = shift;
+  $self->{sqlt} = shift;
+}
+
 1;