fix mistake in days returned by secs_to_english

diff --git a/Debbugs/Common.pm b/Debbugs/Common.pm
index 60e2c3092adbb312dba3bc7c516fca748671ed4e..f88a2f475091a174c8a0d3d8de0591b55e5ba5a2 100644 (file)
--- a/Debbugs/Common.pm
+++ b/Debbugs/Common.pm
@@ -254,7 +254,7 @@ sub secs_to_english{
 
      my $days = int($seconds / 86400);
      my $years = int($days / 365);
-     $days -= $years * 365;
+     $days %= 365;
      my $result;
      my @age;
      push @age, "1 year" if ($years == 1);
@@ -263,7 +263,7 @@ sub secs_to_english{
      push @age, "$days days" if ($days > 1);
      $result .= join(" and ", @age);
 
-     return wantarray?($days,$result):$result;
+     return wantarray?(int($seconds/86400),$result):$result;
 }