From 61ab74e7a63884b6eec19926c4d974c01cfea070 Mon Sep 17 00:00:00 2001
From: Milan <mc@radiopiloten.de>
Date: Fri, 22 Apr 2022 13:40:46 +0200
Subject: [PATCH] audio.pm: round loudness level

---
 lib/calcms/audio.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/calcms/audio.pm b/lib/calcms/audio.pm
index bc06696..3db95a9 100644
--- a/lib/calcms/audio.pm
+++ b/lib/calcms/audio.pm
@@ -87,6 +87,7 @@ sub formatBitrateMode($) {
 sub formatLoudness {
     my $value = shift;
     my $prefix = shift || '';
+    my $round = shift || '';
     return '' unless $value;
 
     $value = sprintf( "%.1f", $value );
@@ -96,6 +97,7 @@ sub formatLoudness {
     $class = 'error' if $value > -16.0;
     $class = 'warn'  if $value < -24.0;
     $class = 'error' if $value < -27.0;
+    $value = int($value+0.5) if $round; 
 
     return qq{<div class="badge-$class">$prefix$value dB</div>};
 }