Ticket #9036: stream_fvl.pl.diff

(a) /home/jean/Downloads/stream_flv.download vs. (b) stream_flv.pl

@@ -2 +2 @@
 #
 # MythWeb Streaming/Download module
 #
 # @url       $URL$
 # @date      $Date$
 # @version   $Revision$
 # @author    $Author$
 #
 
-    use Math::Round qw(round_even);
+    use Math::Round qw(nearest_floor);
 
     our $ffmpeg_pid;
 
@@ -49 +49 @@
     $sh->execute($chanid,$starttime);
     $x = $sh->fetchrow_array;
     $y = $sh->fetchrow_array if ($x);
-    $width = round_even($width);
+    $width = nearest_floor(2,$width);
+
     if ($x && $y) {
-        $height = round_even($width * ($y/$x));
+        $height = nearest_floor(2,$width * ($y/$x));
     } else {
-        $height = round_even($width * 3/4);
+        $height = nearest_floor(2,$width * 3/4);
     }
     $sh->finish();