From 3966a73ec751dbe3b37aa8479ebd07101d56a5e0 Mon Sep 17 00:00:00 2001
From: Daniel Tiefnig <dtiefnig@sipwise.com>
Date: Fri, 17 Jun 2011 17:38:17 +0000
Subject: [PATCH] remove read_only preferences before sending them to the
 backend

---
 lib/admin/Controller/subscriber.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/admin/Controller/subscriber.pm b/lib/admin/Controller/subscriber.pm
index e3c67bf..15a3e54 100644
--- a/lib/admin/Controller/subscriber.pm
+++ b/lib/admin/Controller/subscriber.pm
@@ -764,7 +764,8 @@ sub update_preferences : Local {
     foreach my $db_pref (eval { @$db_prefs }) {
 
         next unless $$db_pref{usr_pref};
-        next if $$db_pref{read_only};
+        delete $$preferences{$$db_pref{preference}}, next
+            if $$db_pref{read_only};
 
         if($$db_pref{preference} eq 'cfu'
                 or $$db_pref{preference} eq 'cfb'