From 43069a7218e3b092cdcb214a0a6a56d13b38f39a Mon Sep 17 00:00:00 2001
From: Struan Donald <struan@exo.org.uk>
Date: Fri, 26 Aug 2011 11:29:33 +0100
Subject: test for removing flag and make it work

---
 perllib/FixMyStreet/App/Controller/Admin.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perllib/FixMyStreet/App/Controller/Admin.pm')

diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm
index 9cc046e13..467f29d26 100644
--- a/perllib/FixMyStreet/App/Controller/Admin.pm
+++ b/perllib/FixMyStreet/App/Controller/Admin.pm
@@ -801,7 +801,7 @@ sub user_edit : Path('user_edit') : Args(1) {
         $user->name( $c->req->param('name') );
         $user->email( $c->req->param('email') );
         $user->from_council( $c->req->param('council') || undef );
-        $user->flagged( $c->req->param('flagged') );
+        $user->flagged( $c->req->param('flagged') || 0 );
         $user->update;
 
         if ($edited) {
-- 
cgit v1.2.3