[gentoo-commits] repo/gentoo:master commit in: eclass/

[David Seifert]

commit:     7e13a3d24c106c1de937fcd756df801ac706efaa
Author:     David Seifert <soap <AT> gentoo <DOT> org>
AuthorDate: Mon Jul 18 14:05:29 2022 +0000
Commit:     David Seifert <soap <AT> gentoo <DOT> org>
CommitDate: Mon Jul 18 14:05:29 2022 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=7e13a3d2

perl-module.eclass: canonical `debug-print-function` calls

Signed-off-by: David Seifert <soap <AT> gentoo.org>

 eclass/perl-module.eclass | 18 +++++++++++-------
 1 file changed, 11 insertions(+), 7 deletions(-)

diff --git a/eclass/perl-module.eclass b/eclass/perl-module.eclass
index be484fb25396..25490c25058a 100644
--- a/eclass/perl-module.eclass
+++ b/eclass/perl-module.eclass
@@ -191,7 +191,7 @@ pm_echovar=""
 # Get the ebuild sources ready.
 # This function is to be called during the ebuild src_prepare() phase.
 perl-module_src_prepare() {
-       debug-print-function $FUNCNAME "$@"
+       debug-print-function ${FUNCNAME} "$@"
 
        default
 
@@ -207,7 +207,7 @@ perl-module_src_prepare() {
 # Configure the ebuild sources.
 # This function is to be called during the ebuild src_configure() phase.
 perl-module_src_configure() {
-       debug-print-function $FUNCNAME "$@"
+       debug-print-function ${FUNCNAME} "$@"
 
        perl_check_env
 
@@ -270,7 +270,8 @@ perl-module_src_configure() {
 # Compile the ebuild sources.
 # This function is to be called during the ebuild src_compile() phase.
 perl-module_src_compile() {
-       debug-print-function $FUNCNAME "$@"
+       debug-print-function ${FUNCNAME} "$@"
+
        perl_set_version
 
        case ${EAPI} in
@@ -324,7 +325,8 @@ perl-module_src_compile() {
 # This code attempts to work out your threadingness and runs tests
 # according to the settings of DIST_TEST using Test::Harness.
 perl-module_src_test() {
-       debug-print-function $FUNCNAME "$@"
+       debug-print-function ${FUNCNAME} "$@"
+
        local my_test_control
        local my_test_verbose
 
@@ -377,7 +379,7 @@ perl-module_src_test() {
 # Install a Perl ebuild.
 # This function is to be called during the ebuild src_install() phase.
 perl-module_src_install() {
-       debug-print-function $FUNCNAME "$@"
+       debug-print-function ${FUNCNAME} "$@"
 
        perl_set_version
 
@@ -450,7 +452,8 @@ perl-module_src_install() {
 # links that prevent file collisions for dual-life packages installing scripts.
 # In any other category it immediately exits.
 perl-module_pkg_postinst() {
-       debug-print-function $FUNCNAME "$@"
+       debug-print-function ${FUNCNAME} "$@"
+
        if [[ ${CATEGORY} != perl-core ]] ; then
                eerror "perl-module.eclass: You are calling 
perl-module_pkg_postinst outside the perl-core category."
                die    "   This does not do anything; the call can be removed."
@@ -465,7 +468,8 @@ perl-module_pkg_postinst() {
 # links that prevent file collisions for dual-life packages installing scripts.
 # In any other category it immediately exits.
 perl-module_pkg_postrm() {
-       debug-print-function $FUNCNAME "$@"
+       debug-print-function ${FUNCNAME} "$@"
+
        if [[ ${CATEGORY} != perl-core ]] ; then
                eerror "perl-module.eclass: You are calling 
perl-module_pkg_postrm outside the perl-core category."
                die    "   This does not do anything; the call can be removed."