From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 24 Jan 2014 19:04:07 +0000 (+0000)
Subject: dgit-repos-server: rename private env vars to DGIT_DRS_...
X-Git-Tag: debian/0.22~85
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;ds=sidebyside;h=b1af6f60f83e15873c35ee802d6c90a6d6b39aaf;p=dgit.git

dgit-repos-server: rename private env vars to DGIT_DRS_...
---

diff --git a/dgit-repos-server b/dgit-repos-server
index aaa75420..c17ae80d 100755
--- a/dgit-repos-server
+++ b/dgit-repos-server
@@ -177,8 +177,8 @@ set -e
 exec $0 --pre-receive-hook $package
 END
     close $fh or die "$prerecv: $!";
-    $ENV{'DGIT_RPR_WORK'}= $workrepo;
-    $ENV{'DGIT_RPR_DEST'}= $destrepo;
+    $ENV{'DGIT_DRS_WORK'}= $workrepo;
+    $ENV{'DGIT_DRS_DEST'}= $destrepo;
 }
 
 sub maybeinstallprospective () {
@@ -443,17 +443,17 @@ sub parseargsdispatch () {
 	shift @ARGV;
 	@ARGV == 1 or die;
 	$package = shift @ARGV;
-	defined($suitesfile = $ENV{'DGIT_RPR_SUITES'}) or die;
-	defined($workrepo = $ENV{'DGIT_RPR_WORK'}) or die;
-	defined($destrepo = $ENV{'DGIT_RPR_DEST'}) or die;
-	defined($keyrings = $ENV{'DGIT_RPR_KEYRINGS'}) or die $!;
+	defined($suitesfile = $ENV{'DGIT_DRS_SUITES'}) or die;
+	defined($workrepo = $ENV{'DGIT_DRS_WORK'}) or die;
+	defined($destrepo = $ENV{'DGIT_DRS_DEST'}) or die;
+	defined($keyrings = $ENV{'DGIT_DRS_KEYRINGS'}) or die $!;
 	open STDOUT, ">&STDERR" or die $!;
 	stunthook();
 	exit 0;
     }
 
-    $ENV{'DGIT_RPR_SUITES'} = argval();
-    $ENV{'DGIT_RPR_KEYRINGS'} = argval();
+    $ENV{'DGIT_DRS_SUITES'} = argval();
+    $ENV{'DGIT_DRS_KEYRINGS'} = argval();
     $dgitrepos = argval();
 
     die unless @ARGV==1 && $ARGV[0] eq '--ssh';