audio.pm: fix division by zero

2020-07-25 14:02:18 +02:00
parent 9b8095b1a4
commit 9e074f6122
1 changed files with 1 additions and 1 deletions
--- 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";