Dave Cross: Still Munging Data With Perl: Online event - Mar 27 Learn more

RIBASUSHI / DBIx-Class-0.082844 / t / lib / ViewDepsBad.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

              
package    # hide from PAUSE
    ViewDepsBad;
## Used in 105view_deps.t
use strict;
use warnings;
use base 'DBICTest::BaseSchema';
__PACKAGE__->load_namespaces;
sub sqlt_deploy_hook {
    my $self = shift;
    $self->{sqlt} = shift;
}
1;