Changeset 28369 for gs2-extensions/video-and-audio/trunk/src/perllib/plugins/AudioPlugin.pm

Timestamp:

2013-10-09T23:31:21+13:00 (11 years ago)

Author:

davidb

Message:

Changes to work with newer version of ffmpeg

File:

• gs2-extensions/video-and-audio/trunk/src/perllib/plugins/AudioPlugin.pm (modified) (2 diffs)

gs2-extensions/video-and-audio/trunk/src/perllib/plugins/AudioPlugin.pm

@@ -210 +210 @@
     $self->init_cache_for_file($filename);
 
-
     my $originalfilename = undef;
     my $type = "unknown";
@@ -235 +234 @@
                             
     $type = $converttotype;
+    $filename = $ofilename;
+    $file = $ofile;
+
+    ($aduration,$asize,$atype,$afreq,$achan,$arate) 
+        = &AudioConverter::identify($ofilename, $outhandle, $verbosity);
+
+    if ($aduration eq "N/A") {
+        print $outhandle "Unable to determine duration of converted $ofile\n";
+        $aduration = undef;
+    }
     }