From 4cedd3dd4b71382ed809a386f0b19160622e17a8 Mon Sep 17 00:00:00 2001 From: dakkar Date: Wed, 8 Feb 2006 14:48:45 +0000 Subject: model::dbic::plain git-svn-id: svn://luxion/repos/IscrittiGroLUG/trunk@166 fcb26f47-9200-0410-b104-b98ab5b095f3 --- GroLUG/lib/GroLUG/M/DB.pm | 40 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 40 insertions(+) create mode 100644 GroLUG/lib/GroLUG/M/DB.pm (limited to 'GroLUG/lib/GroLUG/M/DB.pm') 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 + +=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; + -- cgit v1.2.3