1 files changed, 1 insertions, 1 deletions
diff --git a/Porting/core-cpan-diff b/Porting/core-cpan-diff
index 8e3feeb09f..7dc907b46c 100755
--- a/Porting/core-cpan-diff
+++ b/Porting/core-cpan-diff
@@ -432,7 +432,7 @@ sub get_map {
 
     my $ext;
     for (@$perl_files) {
-	if (m{^((?:ext|cpan)/[^/]+/)}) {
+	if (m{^((?:ext|dist|cpan)/[^/]+/)}) {
 	    if (defined $ext and $ext ne $1) {
 	        # more than one ext/$ext/
 	        undef $ext;