diff options
| author | Struan Donald <struan@exo.org.uk> | 2011-08-09 18:15:25 +0100 |
|---|---|---|
| committer | Struan Donald <struan@exo.org.uk> | 2011-08-09 18:15:25 +0100 |
| commit | 0de9d82a715a21b03226c5ed2aa5a9b2b8ba97a0 (patch) | |
| tree | b6cb2c144dbca4691a76128edab28bf6ab86bce6 /perllib/Utils.pm | |
| parent | a7106bd754ba67ec28bcf5aaf0a56968efa899a2 (diff) | |
| parent | a4bfd8e348a5d589c7a3886cd5fe11bd12f17c6d (diff) | |
Merge branch 'master' of ssh://git.mysociety.org/data/git/public/fixmystreet into open311-consumer
Diffstat (limited to 'perllib/Utils.pm')
| -rw-r--r-- | perllib/Utils.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/Utils.pm b/perllib/Utils.pm index 39c251876..c9afff186 100644 --- a/perllib/Utils.pm +++ b/perllib/Utils.pm @@ -197,7 +197,7 @@ sub cleanup_text { } # Remove unneeded whitespace - my @lines = grep { m/\S/ } split m/\n\n/, $input; + my @lines = grep { m/\S/ } split m/(?:\r?\n){2,}/, $input; for (@lines) { $_ = trim_text($_); $_ = ucfirst $_; # start with capital |