From 9e074f6122e9687fc5cf8191e6ffd80063aeb5cd Mon Sep 17 00:00:00 2001
From: Milan <mc@radiopiloten.de>
Date: Sat, 25 Jul 2020 14:02:18 +0200
Subject: [PATCH] audio.pm: fix division by zero

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

diff --git a/lib/calcms/audio.pm b/lib/calcms/audio.pm
index 22dfb84..bc06696 100644
--- a/lib/calcms/audio.pm
+++ b/lib/calcms/audio.pm
@@ -27,7 +27,7 @@ sub formatDuration($$$;$) {
     my $class = "ok";
     my $title = $mouseOver;
 
-    my $delta = 100 * $audioDuration / $eventDuration;
+    my $delta = 100 * $audioDuration / ($eventDuration+.00000000000001);
 
     if ( $delta > 101 ) {
         $class = "warn";