From 4cedd3dd4b71382ed809a386f0b19160622e17a8 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@luxion>
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 ++++++++++++++++++++++++++++++++++++++++
 GroLUG/t/m_DB.t           |  6 ++++++
 2 files changed, 46 insertions(+)
 create mode 100644 GroLUG/lib/GroLUG/M/DB.pm
 create mode 100644 GroLUG/t/m_DB.t

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');
+
-- 
cgit v1.2.3