[libdist-zilla-role-bootstrap-perl] 95/101: use key for copy source, not value
Axel Beckert
abe at deuxchevaux.org
Sat Aug 8 11:58:41 UTC 2015
This is an automated email from the git hooks/post-receive script.
abe pushed a commit to annotated tag 0.2.2-source
in repository libdist-zilla-role-bootstrap-perl.
commit 89395a2c4e23789841d29fc300a7e38e8e6309d2
Author: Kent Fredric <kentfredric at gmail.com>
Date: Tue Nov 5 01:27:29 2013 +1300
use key for copy source, not value
---
lib/tools.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/tools.pm b/lib/tools.pm
index 121fe78..52b88c3 100644
--- a/lib/tools.pm
+++ b/lib/tools.pm
@@ -114,7 +114,7 @@ sub deploy_sterile {
my $value = $Config{$key};
next unless defined $value;
next unless length $value;
- my $clean_path = '/tmp/perl5-sterile/' . $value;
+ my $clean_path = '/tmp/perl5-sterile/' . $key;
if ( -e $clean_path and -f $clean_path ) {
diag("\e[31mRsyncing over $value\e[0m");
$clean_path =~ s{/?$}{/};
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdist-zilla-role-bootstrap-perl.git
More information about the Pkg-perl-cvs-commits
mailing list