diff options
Diffstat (limited to 'perllib/FixMyStreet/App/Controller')
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Report.pm | 1 | ||||
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Report/Update.pm | 7 |
2 files changed, 7 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Report.pm b/perllib/FixMyStreet/App/Controller/Report.pm index b2f476fec..ee0d03b5b 100644 --- a/perllib/FixMyStreet/App/Controller/Report.pm +++ b/perllib/FixMyStreet/App/Controller/Report.pm @@ -178,6 +178,7 @@ sub format_problem_for_display : Private { if ( $c->user ) { $c->stash->{form_name} = $c->user->name; $c->stash->{email} = $c->user->email; + $c->stash->{may_show_name} = ' checked' if $c->user->name; } $c->stash->{add_alert} = ' checked'; } diff --git a/perllib/FixMyStreet/App/Controller/Report/Update.pm b/perllib/FixMyStreet/App/Controller/Report/Update.pm index 6ad6ffaa5..234b0021c 100644 --- a/perllib/FixMyStreet/App/Controller/Report/Update.pm +++ b/perllib/FixMyStreet/App/Controller/Report/Update.pm @@ -155,6 +155,10 @@ sub process_update : Private { my $name = Utils::trim_text( $params{ name } ); + my $anonymous = 't'; + + $anonymous = 'f' if ( $name && $c->req->param('may_show_name' ) ); + my $update = $c->model('DB::Comment')->new( { text => $params{update}, @@ -166,12 +170,13 @@ sub process_update : Private { cobrand => $c->cobrand->moniker, cobrand_data => $c->cobrand->extra_update_data, lang => $c->stash->{lang_code}, - anonymous => ( $name ? 'f': 't' ), + anonymous => $anonymous, } ); $c->stash->{update} = $update; $c->stash->{add_alert} = $c->req->param('add_alert'); + $c->stash->{may_show_name} = ' checked' if $c->req->param('may_show_name'); return 1; } |