From 9067242a0fac0efca14300cdfd5f2e4ea1c17936 Mon Sep 17 00:00:00 2001
From: Andreas Granig <agranig@sipwise.com>
Date: Thu, 28 Feb 2013 13:15:22 +0100
Subject: [PATCH] Add custom Contract form field.

---
 lib/NGCP/Panel/Field/Contract.pm | 23 +++++++++++++++++++++++
 lib/NGCP/Panel/Form/Reseller.pm  |  3 ++-
 2 files changed, 25 insertions(+), 1 deletion(-)
 create mode 100644 lib/NGCP/Panel/Field/Contract.pm

diff --git a/lib/NGCP/Panel/Field/Contract.pm b/lib/NGCP/Panel/Field/Contract.pm
new file mode 100644
index 0000000000..42b833450e
--- /dev/null
+++ b/lib/NGCP/Panel/Field/Contract.pm
@@ -0,0 +1,23 @@
+package NGCP::Panel::Field::Contract;
+use Moose;
+extends 'HTML::FormHandler::Field::Select';
+
+use Data::Dumper;
+
+sub build_options {
+    my ($self) = @_;
+
+    return [ 
+        { label => 'Select...', value => '' },
+        { label => '1', value => 1 },
+        { label => '2', value => 2 },
+        { label => '3', value => 3 },
+        { label => '4', value => 4 },
+        { label => '5', value => 5 },
+        { label => '6', value => 6 },
+    ];
+}
+
+1;
+
+# vim: set tabstop=4 expandtab:
diff --git a/lib/NGCP/Panel/Form/Reseller.pm b/lib/NGCP/Panel/Form/Reseller.pm
index c8724ead7b..1b7ad0e084 100644
--- a/lib/NGCP/Panel/Form/Reseller.pm
+++ b/lib/NGCP/Panel/Form/Reseller.pm
@@ -20,7 +20,8 @@ has_field 'name' => (
 );
 
 has_field 'contract_id' => (
-    type => 'Integer',
+    type => '+NGCP::Panel::Field::Contract',
+    label => 'Contract',
     required => 1,
 );