From 2779e2ab03b3cf4f227ae45582ad3f31997667c6 Mon Sep 17 00:00:00 2001
From: Warren Usui <warren.usui@inktank.com>
Date: Tue, 25 Mar 2014 16:30:03 -0700
Subject: [PATCH] Make sure s3_utilities are found.

Add FindBin code to rgw/s3 tests to include s3_utilites.pm properly.

Fixes: 7863
Signed-off-by: Warren Usui <warren.usui@inktank.com>
---
 qa/workunits/rgw/s3_bucket_quota.pl     | 2 ++
 qa/workunits/rgw/s3_multipart_upload.pl | 2 ++
 qa/workunits/rgw/s3_user_quota.pl       | 2 ++
 3 files changed, 6 insertions(+)

diff --git a/qa/workunits/rgw/s3_bucket_quota.pl b/qa/workunits/rgw/s3_bucket_quota.pl
index 7aa5a68c8e1d..091cbc977476 100755
--- a/qa/workunits/rgw/s3_bucket_quota.pl
+++ b/qa/workunits/rgw/s3_bucket_quota.pl
@@ -34,6 +34,8 @@ use IO::File;
 use Getopt::Long;
 use Digest::MD5;
 use Pod::Usage();
+use FindBin;
+use lib $FindBin::Bin;
 use s3_utilities;
 
 my $help;
diff --git a/qa/workunits/rgw/s3_multipart_upload.pl b/qa/workunits/rgw/s3_multipart_upload.pl
index b53232699775..449d212a1e72 100755
--- a/qa/workunits/rgw/s3_multipart_upload.pl
+++ b/qa/workunits/rgw/s3_multipart_upload.pl
@@ -33,6 +33,8 @@ use IO::File;
 use Getopt::Long;
 use Digest::MD5;
 use Pod::Usage();
+use FindBin;
+use lib $FindBin::Bin;
 use s3_utilities;
 
 my $help;
diff --git a/qa/workunits/rgw/s3_user_quota.pl b/qa/workunits/rgw/s3_user_quota.pl
index 43684a4faeda..985d82f7fa2a 100755
--- a/qa/workunits/rgw/s3_user_quota.pl
+++ b/qa/workunits/rgw/s3_user_quota.pl
@@ -33,6 +33,8 @@ use IO::File;
 use Getopt::Long;
 use Digest::MD5;
 use Pod::Usage();
+use FindBin;
+use lib $FindBin::Bin;
 use s3_utilities;
 
 my $help;
-- 
2.47.3