aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perllib/FixMyStreet/App/Controller/Admin.pm12
-rw-r--r--templates/web/default/admin/users.html7
2 files changed, 16 insertions, 3 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm
index a3a241590..121aa2562 100644
--- a/perllib/FixMyStreet/App/Controller/Admin.pm
+++ b/perllib/FixMyStreet/App/Controller/Admin.pm
@@ -782,6 +782,16 @@ sub users: Path('users') : Args(0) {
} else {
$c->forward('get_token');
$c->forward('fetch_all_bodies');
+
+ # Admin users by default
+ my $users = $c->model('DB::User')->search(
+ { from_body => { '!=', undef } },
+ { order_by => 'name' }
+ );
+ my @users = $users->all;
+ my %email2user = map { $_->email => $_ } @users;
+ $c->stash->{users} = \@users;
+
}
return 1;
@@ -903,6 +913,8 @@ sub user_add : Path('user_edit') : Args(0) {
$c->forward('check_token');
+ return unless $c->req->param('name') && $c->req->param('email');
+
my $user = $c->model('DB::User')->find_or_create( {
name => $c->req->param('name'),
email => $c->req->param('email'),
diff --git a/templates/web/default/admin/users.html b/templates/web/default/admin/users.html
index de0b74746..70833ff85 100644
--- a/templates/web/default/admin/users.html
+++ b/templates/web/default/admin/users.html
@@ -5,7 +5,7 @@
<p><label for="search">[% loc('Search:') %]</label> <input type="text" name="search" size="30" id="search" value="[% searched | html %]">
</form>
-[% IF searched %]
+[% IF users.size %]
<table cellspacing="0" cellpadding="2" border="1">
<tr>
@@ -30,10 +30,11 @@
[%- END -%]
</table>
-[% ELSE %]
+[% END %]
+[% IF NOT searched %]
<h2>[% loc('Add user') %]</h2>
-[% INCLUDE 'admin/user-form.html' %]
+[% INCLUDE 'admin/user-form.html', user = '' %]
[% END %]