From: Wayne Davison <wayned@samba.org>
Date: Mon, 6 Apr 2020 00:18:32 +0000 (-0700)
Subject: A quick fix for some perl patch-helper scripts.
X-Git-Tag: v3.2.0pre1~184
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b63276e70fb82de7cf30cf29100acfb7650c4f43;p=thirdparty%2Frsync.git

A quick fix for some perl patch-helper scripts.
---

diff --git a/packaging/branch-from-patch b/packaging/branch-from-patch
index 469f3d60..a66cb16f 100755
--- a/packaging/branch-from-patch
+++ b/packaging/branch-from-patch
@@ -13,6 +13,8 @@ use Getopt::Long;
 );
 &usage if $help_opt;
 
+push @INC, '.';
+
 require 'packaging/git-status.pl';
 check_git_state($master_branch, !$skip_branch_check, 1);
 
diff --git a/packaging/patch-update b/packaging/patch-update
index 4839716d..e279c6bc 100755
--- a/packaging/patch-update
+++ b/packaging/patch-update
@@ -33,6 +33,8 @@ if (defined $incl_generated_files) {
 die "No '$patches_dir' directory was found.\n" unless -d $patches_dir;
 die "No '.git' directory present in the current dir.\n" unless -d '.git';
 
+push @INC, '.';
+
 require 'packaging/git-status.pl';
 my $starting_branch = check_git_state($master_branch, !$skip_branch_check, 1);