From 764865cdcf7d51636fa1c81fbdb837933d19ef54 Mon Sep 17 00:00:00 2001
From: Gerhard Jungwirth <gjungwirth@sipwise.com>
Date: Wed, 27 Mar 2013 16:41:30 +0100
Subject: [PATCH] start using ngcp-schema (for domains)

- requires: ngcp-schema and sipwise-base
---
 lib/NGCP/Panel/Controller/Domain.pm | 13 +++++++------
 lib/NGCP/Panel/Model/billing.pm     | 13 +++++++++++++
 2 files changed, 20 insertions(+), 6 deletions(-)
 create mode 100644 lib/NGCP/Panel/Model/billing.pm

diff --git a/lib/NGCP/Panel/Controller/Domain.pm b/lib/NGCP/Panel/Controller/Domain.pm
index 98c6a4936a..288f80a24e 100644
--- a/lib/NGCP/Panel/Controller/Domain.pm
+++ b/lib/NGCP/Panel/Controller/Domain.pm
@@ -23,12 +23,13 @@ sub list :Chained('/') :PathPart('domain') :CaptureArgs(0) {
     my ($self, $c) = @_;
 
     my $domains = [
-        {id => 1, domain => '1.example.org'},
-        {id => 2, domain => '2.example.org'},
-        {id => 3, domain => '3.example.org'},
-        {id => 4, domain => '4.example.org'},
-        {id => 5, domain => '5.example.org'},
-        {id => 6, domain => '6.example.org'},
+    map { +{ id => $_->id, domain => $_->domain } } $c->model('billing')->resultset('domains')->all
+#        {id => 1, domain => '1.example.org'},
+#        {id => 2, domain => '2.example.org'},
+#        {id => 3, domain => '3.example.org'},
+#        {id => 4, domain => '4.example.org'},
+#        {id => 5, domain => '5.example.org'},
+#        {id => 6, domain => '6.example.org'},
     ];
     $c->stash(domains => $domains);
     $c->stash(template => 'domain/list.tt');
diff --git a/lib/NGCP/Panel/Model/billing.pm b/lib/NGCP/Panel/Model/billing.pm
new file mode 100644
index 0000000000..54ba965b62
--- /dev/null
+++ b/lib/NGCP/Panel/Model/billing.pm
@@ -0,0 +1,13 @@
+package NGCP::Panel::Model::billing;
+
+use strict;
+use base 'Catalyst::Model::DBIC::Schema';
+
+__PACKAGE__->config(
+    schema_class => 'NGCP::Schema::billing',
+    
+    connect_info => {
+        dsn => 'dbi:mysql:dbname=billing',
+        user => 'root',
+    }
+);