From: Jesse Vincent <jesse@bestpractical.com>
Date: Mon, 19 Oct 2009 19:18:35 +0000 (-0400)
Subject: Porting/core-cpan-diff now tells us who the upstream is for dual-lifed modules
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d55832d0634f6552c3fb50ca38aa6149c7a653df;p=p5sagit%2Fp5-mst-13.2.git

Porting/core-cpan-diff now tells us who the upstream is for dual-lifed modules
---

diff --git a/Porting/core-cpan-diff b/Porting/core-cpan-diff
index 7dc907b..1da5ad7 100755
--- a/Porting/core-cpan-diff
+++ b/Porting/core-cpan-diff
@@ -207,6 +207,9 @@ sub do_compare {
 	if ($seen_dist{$dist}) {
 	    warn "WARNING: duplicate entry for $dist in $module\n"
 	}
+
+	print $outfh "  upstream is: ".($m->{UPSTREAM} || 'UNKNOWN!')."\n";
+
 	$seen_dist{$dist}++;
 
 	my $cpan_dir;