From b3f12a6c3542cfc33c489aae14e5abd18a0345d1 Mon Sep 17 00:00:00 2001
From: Jan Lindemann <jan@janware.com>
Date: Sat, 17 Jun 2017 09:16:44 +0000
Subject: [PATCH] pgit.sh: Add support for defining pdir and pdirs in the
 environment

TODO: These variables seem a bit short for the environment

Signed-off-by: Jan Lindemann <jan@janware.com>
---
 scripts/pgit.sh | 19 ++++++++++++-------
 1 file changed, 12 insertions(+), 7 deletions(-)

diff --git a/scripts/pgit.sh b/scripts/pgit.sh
index f4171a05..c876a694 100644
--- a/scripts/pgit.sh
+++ b/scripts/pgit.sh
@@ -28,13 +28,18 @@ fat_marker()
 
 config()
 {
-	# guess pdir
-	pdir=`pwd`
-	while [ `cat $pdir/CVS/Repository 2>/dev/null` != proj ]; do
-		[ "$pdir" = / ] && fatal "didn't find \"proj\" in directory components"
-		pdir=`dirname $pdir`
-	done
-	pdirs=`(cd $pdir; ls -d */.git 2>/dev/null | sed 's%/.git%%')`
+	[ "$pdir" ] || {
+		# guess pdir
+		pdir=`pwd`
+		while [ `cat $pdir/CVS/Repository 2>/dev/null` != proj ]; do
+			[ "$pdir" = / ] && fatal "didn't find \"proj\" in directory components"
+			pdir=`dirname $pdir`
+		done
+	}
+
+	[ "$pdirs" ] || {
+		pdirs=`(cd $pdir; ls -d */.git 2>/dev/null | sed 's%/.git%%')`
+	}
 }
 
 run_git()