1 |
diff -Naur acidrip-0.14/AcidRip/acidrip.pm acidrip-0.14.tpg/AcidRip/acidrip.pm |
2 |
--- acidrip-0.14/AcidRip/acidrip.pm 2004-07-25 14:03:09.000000000 +0000 |
3 |
+++ acidrip-0.14.tpg/AcidRip/acidrip.pm 2007-07-15 14:37:45.000000000 +0000 |
4 |
@@ -680,7 +680,7 @@ |
5 |
message( "Running " . get_command("cropdetect") ); |
6 |
open( CROP, get_command("cropdetect") . " 2>&1 |" ); |
7 |
while (<CROP>) { |
8 |
- if ( $_ =~ /crop area.*\s(crop=\d*:\d*:\d*:\d*)/ ) { $crop{$1}++ } |
9 |
+ if ( $_ =~ /[cC]rop area.*\s(crop=\d*:\d*:\d*:\d*)/ ) { $crop{$1}++ } |
10 |
$crop_output .= $_; |
11 |
gui_check($_); |
12 |
} |
13 |
@@ -863,7 +863,7 @@ |
14 |
if ( $::settings->{'mencoder_pid'} = open( MENCODER, "$menc 2>&1 |" ) ) { |
15 |
$/ = "\r"; |
16 |
while (<MENCODER>) { |
17 |
- if (/^Pos:\s*(\d+).\ds\s+(\d+)f\s+\(\s*(\d+)%\)\s+(\d+fps)\sTrem:\s+(\d+min)\s+(\d+mb).+\[([\d:]+)\]/) { |
18 |
+ if (/^Pos:\s*(\d+)\.\ds\s+(\d+)f\s+\(\s*(\d+)%\)\s+([\d.]+fps)\sTrem:\s+(\d+min)\s+(\d+mb).+\[([\d:]+)\]/) { |
19 |
if ( $1 ne $sec ) { $sec = $1; $::widgets->{'menc_seconds'}->set_text( hhmmss($1) ) } |
20 |
if ( $4 ne $fps ) { $fps = $4; $::widgets->{'menc_fps'}->set_text($4) } |
21 |
if ( $6 ne $size ) { $size = $6; $::widgets->{'menc_filesize'}->set_text($6) } |