TT#161550 fix processing single files only

Change-Id: I8b0072e2f9afd7ce122111dd5ea39ec9f9bacd04 (cherry picked from commit 25cf45f7a0)
4 years ago · 25cb60f1ed
parent 7c54beedf4
commit 25cb60f1ed
1 changed files with 3 additions and 3 deletions
--- a/lib/NGCP/BulkProcessor/FileProcessor.pm
+++ b/lib/NGCP/BulkProcessor/FileProcessor.pm
@ -110,7 +110,7 @@ sub process {
    my $single_file = 1;
    $single_file = 0 if ('CODE' eq ref $file);
    $files_code = sub {
-        my $cb = shift;
+        my ($context,$cb) = @_;
        $cb->($file);
    } if $single_file;

@ -200,7 +200,7 @@ sub process {
                }
                
                $files_code->($context,sub {
-                    my $filename = shift;
+                    $filename = shift;
                    if (-s $filename > 0) {
                        fileprocessingstarted($filename,getlogger(__PACKAGE__));
                    } else {
@ -343,7 +343,7 @@ sub _reader {
        }

        $context->{files_code}->($context,sub {
-            my $filename = shift;
+            $filename = shift;
            if (-s $filename > 0) {
                fileprocessingstarted($filename,getlogger(__PACKAGE__));
            } else {