From 024d3fc92a0c27c51b3ea5e7bf5c459a8dffeae6 Mon Sep 17 00:00:00 2001
From: Andreas Granig <agranig@sipwise.com>
Date: Tue, 13 May 2014 15:05:45 +0200
Subject: [PATCH] MT#7029 API: fix exposure of administrative flag.

---
 lib/NGCP/Panel/Role/API/Subscribers.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lib/NGCP/Panel/Role/API/Subscribers.pm b/lib/NGCP/Panel/Role/API/Subscribers.pm
index 67ee8d5767..659fe663a3 100644
--- a/lib/NGCP/Panel/Role/API/Subscribers.pm
+++ b/lib/NGCP/Panel/Role/API/Subscribers.pm
@@ -44,6 +44,8 @@ sub resource_from_item {
         $resource{email} = undef;
     }
 
+    $resource{administrative} = delete $resource{admin};
+
     $form //= $self->get_form($c);
     last unless $self->validate_form(
         c => $c,
@@ -226,6 +228,8 @@ sub prepare_resource {
         form => $form,
     );
 
+    use Data::Printer; p $resource;
+
     unless($domain) {
         $domain = $c->model('DB')->resultset('domains')->search($resource->{domain_id});
         if($c->user->roles eq "admin") {