diff options
Diffstat (limited to 'lib/Image/ExifTool/QuickTimeStream.pl')
-rw-r--r-- | lib/Image/ExifTool/QuickTimeStream.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Image/ExifTool/QuickTimeStream.pl b/lib/Image/ExifTool/QuickTimeStream.pl index d080b7f6..a2273743 100644 --- a/lib/Image/ExifTool/QuickTimeStream.pl +++ b/lib/Image/ExifTool/QuickTimeStream.pl @@ -1144,13 +1144,13 @@ sub ProcessSamples($) } @$size < @$start + $samplesPerChunk and $et->WarnOnce('Sample size error'), last; my $sampleStart = $chunkStart; - for ($i=0; ; ) { +Sample: for ($i=0; ; ) { push @$start, $sampleStart; if (defined $time) { until ($timeCount) { if (@$stts < 2) { undef $time; - last; + last Sample; } $timeCount = shift @$stts; $timeDelta = shift @$stts; |