Changeset 91
- Timestamp:
- 07.12.2006 16:56:53 (2 years ago)
- Files:
-
- trunk/devel/FuzzyOcr.pm (modified) (3 diffs)
- trunk/devel/FuzzyOcr/Config.pm (modified) (1 diff)
- trunk/devel/FuzzyOcr/Misc.pm (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/devel/FuzzyOcr.pm
r90 r91 91 91 $end = fuzzyocr_do( $self, $conf, $pms ); 92 92 } 93 infolog("Processed in ".93 debuglog("Processed in ". 94 94 sprintf("%.6f",tv_interval($begin, [gettimeofday])) 95 95 ." sec."); … … 267 267 268 268 if ($cnt == 0) { 269 infolog("Skipping OCR, no image files found...");269 debuglog("Skipping OCR, no image files found..."); 270 270 removedirs(get_all_tmpdirs()) if (defined($imgdir) and ($conf->{focr_keep_bad_images}<2)); 271 271 return 0; … … 675 675 if ($internal_score + $current_score > $score) { 676 676 my $total = $internal_score + $current_score; 677 infolog("OCR canceled, message got already more than $score points ($total) by other FuzzyOcr tests."); 677 warnlog("FuzzyOcr stopped, message got $internal_score points by other FuzzyOcr tests ($total>$score)." 678 #infolog("OCR canceled, message got already more than $score points ($total) by other FuzzyOcr tests."); 678 679 return 0; 679 680 } trunk/devel/FuzzyOcr/Config.pm
r89 r91 574 574 next if $k =~ m/^focr_bin_/; 575 575 next if $k =~ m/^focr_mysql_pass/; 576 next if $k =~ m/^focr_threshold_/; 576 577 debuglog(" $k => ".$conf->{$k}); 577 578 } trunk/devel/FuzzyOcr/Misc.pm
r88 r91 79 79 } else { 80 80 set_pid($pid); wait(); $retcode = $?; 81 infolog("Elapsed: ".81 debuglog("Elapsed: ". 82 82 sprintf ("%.6f",tv_interval($begin, [gettimeofday])) 83 83 ." sec. ($pgm)($retcode)"); … … 118 118 } else { 119 119 set_pid($pid); wait(); $retcode = $?>>8; 120 infolog("Elapsed: ".120 debuglog("Elapsed: ". 121 121 sprintf ("%.6f",tv_interval($begin, [gettimeofday])) 122 122 ." sec. ($pgm)($retcode)"); … … 138 138 infolog("Successfully killed PID $pid"); 139 139 } elsif ($ret < 0) { 140 infolog("No processes left... this shouldn't happen...");140 warnlog("No processes left... this shouldn't happen..."); 141 141 } else { 142 infolog("Failed to kill PID $pid, possibly stale process");142 warnlog("Failed to kill PID $pid, possibly stale process"); 143 143 } 144 144 return -1;
