diff options
author | Kent Fredric <kentfredric@gmail.com> | 2012-02-16 18:22:17 +1300 |
---|---|---|
committer | Kent Fredric <kentfredric@gmail.com> | 2012-02-16 18:22:17 +1300 |
commit | d0dc16c73eb319addfa7190fa9a06fa8283a34bf (patch) | |
tree | 5e701452b395ea4042cfd940261672e38598769c | |
parent | [perl-module.eclass] work around the absolutely insane failure handling syste... (diff) | |
download | perl-overlay-d0dc16c73eb319addfa7190fa9a06fa8283a34bf.tar.gz perl-overlay-d0dc16c73eb319addfa7190fa9a06fa8283a34bf.tar.bz2 perl-overlay-d0dc16c73eb319addfa7190fa9a06fa8283a34bf.zip |
[perl-module.eclass] refactor error message code to show bug report request after the error message by integrating it in the data passed to die()
-rw-r--r-- | eclass/perl-module.eclass | 19 |
1 files changed, 12 insertions, 7 deletions
diff --git a/eclass/perl-module.eclass b/eclass/perl-module.eclass index bdda6995f..c40cf69cf 100644 --- a/eclass/perl-module.eclass +++ b/eclass/perl-module.eclass @@ -133,15 +133,20 @@ perl_nonfatal() { perl_fatal_error() { debug-print-function $FUNCNAME "$@" + local msg; + msg=" + +-- Gentoo Perl Team Specific Bug reporting request -- + +Please attach the contents of the following file with your bug report: + + $(perl_diagfile) + +" perl_diagnostics; - eerror "-- Gentoo Perl Team Specific Bug reporting request -- " - eerror "" - eerror "Please attach the contents of the following file with your bug report:"; - eerror "" - eerror " $(perl_diagfile)" - eerror "" - die "$@" + die "$@ $msg" } + perl-module_src_unpack() { debug-print-function $FUNCNAME "$@" base_src_unpack |