From fb17640c032f0ba0d6594076a71b8b37fda8b373 Mon Sep 17 00:00:00 2001 From: Indranil Das Gupta Date: Sun, 14 Jun 2015 14:52:04 +0530 Subject: [PATCH] Bug 13663: (followup) fixes tab char QA test fails Fixes the tab char qa test suite fails in the following files: 1/ tools/upload-file-progress.pl 2/ tools/upload-file.pl Signed-off-by: Jonathan Druart Amended patch: tidy whitespaces Signed-off-by: Tomas Cohen Arazi --- tools/upload-file-progress.pl | 14 +++++++------- tools/upload-file.pl | 16 ++++++++-------- 2 files changed, 15 insertions(+), 15 deletions(-) diff --git a/tools/upload-file-progress.pl b/tools/upload-file-progress.pl index 3f7d2cd1fc..91af827013 100755 --- a/tools/upload-file-progress.pl +++ b/tools/upload-file-progress.pl @@ -31,9 +31,9 @@ use CGI::Cookie; # need to check cookies before # having CGI parse the POST request my $flags_required = [ - {circulate => 'circulate_remaining_permissions'}, - {tools => 'stage_marc_import'}, - {tools => 'upload_local_cover_images'} + {circulate => 'circulate_remaining_permissions'}, + {tools => 'stage_marc_import'}, + {tools => 'upload_local_cover_images'}, ]; my %cookies = fetch CGI::Cookie; @@ -41,10 +41,10 @@ my %cookies = fetch CGI::Cookie; my ($auth_status, $sessionID) = check_cookie_auth($cookies{'CGISESSID'}->value); my $auth_failure = 1; -foreach my $flag_required (@{ $flags_required}) { - if (my $flags = haspermission(C4::Context->config('user'), $flag_required)) { - $auth_failure = 0 if $auth_status eq 'ok'; - } +foreach my $flag_required ( @{$flags_required} ) { + if ( my $flags = haspermission( C4::Context->config('user'), $flag_required ) ) { + $auth_failure = 0 if $auth_status eq 'ok'; + } } if ($auth_failure) { diff --git a/tools/upload-file.pl b/tools/upload-file.pl index 2dd66f0ed2..94a33a6baf 100755 --- a/tools/upload-file.pl +++ b/tools/upload-file.pl @@ -39,19 +39,19 @@ use C4::UploadedFile; # have been created. my $flags_required = [ - {circulate => 'circulate_remaining_permissions'}, - {tools => 'stage_marc_import'}, - {tools => 'upload_local_cover_images'} + {circulate => 'circulate_remaining_permissions'}, + {tools => 'stage_marc_import'}, + {tools => 'upload_local_cover_images'} ]; my %cookies = fetch CGI::Cookie; my $auth_failure = 1; -my ($auth_status, $sessionID) = check_cookie_auth($cookies{'CGISESSID'}->value); -foreach my $flag_required (@{ $flags_required}) { - if (my $flags = haspermission(C4::Context->config('user'), $flag_required)) { - $auth_failure = 0 if $auth_status eq 'ok'; - } +my ( $auth_status, $sessionID ) = check_cookie_auth( $cookies{'CGISESSID'}->value ); +foreach my $flag_required ( @{$flags_required} ) { + if ( my $flags = haspermission( C4::Context->config('user'), $flag_required ) ) { + $auth_failure = 0 if $auth_status eq 'ok'; + } } if ($auth_failure) { -- 2.39.5