GroLUG/lib/GroLUG/M/DB.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

package GroLUG::M::DB; 
 
use strict;
use base 'Catalyst::Model::DBIC::Plain';
 
my @conn_info = (
    '',
    '',
    '',
    { RaiseError => 1, PrintError => 0, ShowErrorStatement => 1, TraceLevel => 0 }
);
 
__PACKAGE__->load_classes;
__PACKAGE__->compose_connection( __PACKAGE__, @conn_info );
 
=head1 NAME
 
GroLUG::M::DB - DBIC Plain Model Component
 
=head1 SYNOPSIS
 
See L<GroLUG>
 
=head1 DESCRIPTION
 
DBIC Plain Model Component.
 
=head1 AUTHOR
 
A clever guy
 
=head1 LICENSE
 
This library is free software . You can redistribute it and/or modify
it under the same terms as perl itself.
 
=cut
 
1;