diff options
author | dakkar <dakkar@luxion> | 2006-02-08 14:48:45 +0000 |
---|---|---|
committer | dakkar <dakkar@luxion> | 2006-02-08 14:48:45 +0000 |
commit | 4cedd3dd4b71382ed809a386f0b19160622e17a8 (patch) | |
tree | 6fd16e8b59553516a7f56bb48b5ed81614832768 | |
parent | view::TTsite (diff) | |
download | IscrittiGroLUG-4cedd3dd4b71382ed809a386f0b19160622e17a8.tar.gz IscrittiGroLUG-4cedd3dd4b71382ed809a386f0b19160622e17a8.tar.bz2 IscrittiGroLUG-4cedd3dd4b71382ed809a386f0b19160622e17a8.zip |
model::dbic::plain
git-svn-id: svn://luxion/repos/IscrittiGroLUG/trunk@166 fcb26f47-9200-0410-b104-b98ab5b095f3
-rw-r--r-- | GroLUG/lib/GroLUG/M/DB.pm | 40 | ||||
-rw-r--r-- | GroLUG/t/m_DB.t | 6 |
2 files changed, 46 insertions, 0 deletions
diff --git a/GroLUG/lib/GroLUG/M/DB.pm b/GroLUG/lib/GroLUG/M/DB.pm new file mode 100644 index 0000000..e45de9e --- /dev/null +++ b/GroLUG/lib/GroLUG/M/DB.pm @@ -0,0 +1,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; + diff --git a/GroLUG/t/m_DB.t b/GroLUG/t/m_DB.t new file mode 100644 index 0000000..dee8fd0 --- /dev/null +++ b/GroLUG/t/m_DB.t @@ -0,0 +1,6 @@ +use strict; +use warnings; + +use Test::More tests => 1; +use_ok('GroLUG::M::DB'); + |