diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2011-05-24 16:56:35 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2011-05-24 16:56:35 +0100 |
| commit | ea4b72706950650effcaf98d42cc50362b145dcd (patch) | |
| tree | 5fbb1bcfa5f94b85685d04d4a00be575c62456e6 /perllib/FixMyStreet/TestMech.pm | |
| parent | e1444cafa50b8857bb40049a921bd388684db03f (diff) | |
Create some _local functions to return the right DateTimes.
Diffstat (limited to 'perllib/FixMyStreet/TestMech.pm')
| -rw-r--r-- | perllib/FixMyStreet/TestMech.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/TestMech.pm b/perllib/FixMyStreet/TestMech.pm index 386566e40..4c13831ba 100644 --- a/perllib/FixMyStreet/TestMech.pm +++ b/perllib/FixMyStreet/TestMech.pm @@ -325,7 +325,9 @@ sub extract_problem_meta { } ->scrape( $mech->response ); - return $result->{meta}; + my ($meta) = map { s/^\s+//; s/\s+$//; $_; } ($result->{meta}); + + return $meta; } =head2 extract_problem_title |