diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-04-23 21:39:03 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-04-23 21:39:03 +0100 |
commit | 0accdd48ba097069ed72ce592d307484b9284ba7 (patch) | |
tree | a756681983c2c79696a00a2f159396d65ae989bb | |
parent | 29cab1c7c78cf4485857eb62d0c00db51341327a (diff) | |
download | perl-0accdd48ba097069ed72ce592d307484b9284ba7.tar.gz |
Use %Module::CoreList::bug_tracker to print out upstream bug tracker URLs.
Where the user names a module that their bug report is about, and we know the
URL for its upstream bug tracker, provide a message to the user explaining
that the core copies the CPAN version directly, and provide the URL for
reporting the bug directly to upstream.
-rw-r--r-- | utils/perlbug.PL | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/utils/perlbug.PL b/utils/perlbug.PL index 97cf0c85d7..78c3b428a1 100644 --- a/utils/perlbug.PL +++ b/utils/perlbug.PL @@ -604,6 +604,12 @@ for $entry on http://rt.cpan.org, and report your issue there. EOF $entry = ''; + } elsif (my $bug_tracker = $Module::CoreList::bug_tracker{$entry}) { + paraprint <<"EOF"; +$entry included with core Perl is copied directly from the CPAN distribution. +Please report bugs in $entry directly to its maintainers using $bug_tracker +EOF + $entry = ''; } elsif ($entry) { $category ||= 'library'; $report_about_module = $entry; |