diff options
| author | matthew <matthew> | 2007-05-09 13:31:07 +0000 |
|---|---|---|
| committer | matthew <matthew> | 2007-05-09 13:31:07 +0000 |
| commit | 401900b0ea449c993cc8956bc296cf994c6bd94a (patch) | |
| tree | 16d4fedd3c3abe21468a6c232711c8b891762542 /perllib/Page.pm | |
| parent | ef8d0d4d5aebbfa8bad97ca72ef4e3d87d06e274 (diff) | |
For exactly 1 minute.
Diffstat (limited to 'perllib/Page.pm')
| -rw-r--r-- | perllib/Page.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index e2d1f9f57..4e7a17ed7 100644 --- a/perllib/Page.pm +++ b/perllib/Page.pm @@ -6,7 +6,7 @@ # Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org; WWW: http://www.mysociety.org/ # -# $Id: Page.pm,v 1.43 2007-05-04 14:36:56 matthew Exp $ +# $Id: Page.pm,v 1.44 2007-05-09 13:31:07 matthew Exp $ # package Page; @@ -350,7 +350,7 @@ sub prettify_duration { } sub _part { my ($s, $m, $w, $o) = @_; - if ($$s > $m) { + if ($$s >= $m) { my $i = int($$s / $m); push @$o, "$i $w" . ($i != 1 ? 's' : ''); $$s -= $i * $m; |