about summary refs log tree commit homepage
path: root/lib/PublicInbox
diff options
context:
space:
mode:
authorEric Wong <e@yhbt.net>2020-01-06 05:31:07 +0000
committerEric Wong <e@yhbt.net>2020-01-06 06:13:44 +0000
commit55b5349f7516ec04e003470cfe13238e0b0e5435 (patch)
tree3048c0432ef1c07e946b924307c91a091d3b3887 /lib/PublicInbox
parent033f628b52ebacf4a7bf8795084ba5ec498004bf (diff)
downloadpublic-inbox-55b5349f7516ec04e003470cfe13238e0b0e5435.tar.gz
wwwstatic: use sprintf for Perl <5.22 compatibility
We only declare a Perl 5.10.1+ requirement, and POSIX::lround
was not added until 5.21.4 (5.22.0 for stable releases).
Diffstat (limited to 'lib/PublicInbox')
-rw-r--r--lib/PublicInbox/WwwStatic.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/PublicInbox/WwwStatic.pm b/lib/PublicInbox/WwwStatic.pm
index bc42236e..917049bb 100644
--- a/lib/PublicInbox/WwwStatic.pm
+++ b/lib/PublicInbox/WwwStatic.pm
@@ -12,7 +12,7 @@ use strict;
 use parent qw(Exporter);
 use bytes ();
 use Fcntl qw(SEEK_SET O_RDONLY O_NONBLOCK);
-use POSIX qw(strftime lround);
+use POSIX qw(strftime);
 use HTTP::Date qw(time2str);
 use HTTP::Status qw(status_message);
 use Errno qw(EACCES ENOTDIR ENOENT);
@@ -238,7 +238,7 @@ sub human_size ($) {
                         last;
                 }
         }
-        lround($size).$suffix;
+        sprintf('%lu', $size).$suffix;
 }
 
 # by default, this returns "index.html" if it exists for a given directory