diff options
author | Edmund von der Burg <evdb@mysociety.org> | 2011-03-24 12:40:49 +0000 |
---|---|---|
committer | Edmund von der Burg <evdb@mysociety.org> | 2011-03-24 12:40:49 +0000 |
commit | d839ff45d1bbbb65d2e1faac1a6a62a955aabb54 (patch) | |
tree | 0b2696892f95ec9da74a689a1b306636bbee8a96 /perllib | |
parent | 237fff72cf2b574ae8d19e9e2596ea93e08fcfc6 (diff) |
auth related fixes
Diffstat (limited to 'perllib')
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Auth.pm | 7 | ||||
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Reports/New.pm | 2 |
2 files changed, 7 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Auth.pm b/perllib/FixMyStreet/App/Controller/Auth.pm index 3d60172cf..16f0b994c 100644 --- a/perllib/FixMyStreet/App/Controller/Auth.pm +++ b/perllib/FixMyStreet/App/Controller/Auth.pm @@ -155,7 +155,12 @@ Let the user change their password. sub change_password : Local { my ( $self, $c ) = @_; - # FIXME - should be logged in + # FIXME - handle not being logged in more elegantly + unless ( $c->user ) { + $c->res->redirect( $c->uri_for('/auth') ); + $c->detach; + } + # FIXME - CSRF check here # FIXME - minimum criteria for passwords (length, contain number, etc) diff --git a/perllib/FixMyStreet/App/Controller/Reports/New.pm b/perllib/FixMyStreet/App/Controller/Reports/New.pm index 20fb24a32..14e3d8c9a 100644 --- a/perllib/FixMyStreet/App/Controller/Reports/New.pm +++ b/perllib/FixMyStreet/App/Controller/Reports/New.pm @@ -478,7 +478,7 @@ sub process_report : Private { 'title', 'detail', 'pc', # 'name', 'may_show_name', # 'category', # - 'partial', 'skipped', 'upload_fileid', # + 'partial', 'skipped', # ); # create a new report, but don't save it yet |