aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xutils/scancpan3
1 files changed, 3 insertions, 0 deletions
diff --git a/utils/scancpan b/utils/scancpan
index ac5fd5159a..dbd8dab6d3 100755
--- a/utils/scancpan
+++ b/utils/scancpan
@@ -611,6 +611,9 @@ sub fetch {
unless ($dist{$name} && !$top) {
say qq{fetch ${name}} unless $quiet;
my $result = $mcpan->release( distribution => $name );
+ my $main_module = $result->{main_module};
+ push @info, qq{[$name] $main_module is a core module}
+ if $top && Module::CoreList::is_core( $main_module, undef, $] );
$dist{$name} = $result;
$license_files{$name} = {};
eval {