Gentoo Websites Logo
Go to: Gentoo Home Documentation Forums Lists Bugs Planet Store Wiki Get Gentoo!
View | Details | Raw Unified | Return to bug 686168
Collapse All | Expand All

(-)/usr/sbin/perl-cleaner (-4 / +4 lines)
Lines 210-218 Link Here
210
    if ${MODULES} ; then
210
    if ${MODULES} ; then
211
        veinfo 1 "Locating packages for an update"
211
        veinfo 1 "Locating packages for an update"
212
    fi
212
    fi
213
    if ${LIBPERL} ; then
214
        veinfo 1 "Locating ebuilds linked against libperl"
215
    fi
216
213
217
    local scanelf=scanelf
214
    local scanelf=scanelf
218
    [[ -e ""/usr/lib/libperl.dylib ]] \
215
    [[ -e ""/usr/lib/libperl.dylib ]] \
Lines 223-230 Link Here
223
            ewarn "--libperl is disbled."
220
            ewarn "--libperl is disbled."
224
            LIBPERL=false
221
            LIBPERL=false
225
        else
222
        else
226
            SONAME="$(${scanelf} -qBS "$(realpath ""/usr/lib/libperl.{so,dylib} 2>/dev/null )" | awk '{ print $1 }')"
223
            SONAME="$(${scanelf} -qBS $(sed -n -e'/\/libperl\./s!obj \(.*\) \(.*\) \(.*\)$!\1!p' ${PKG_DBDIR}/dev-lang/perl-5.*/CONTENTS ) | awk '{ print $1 }')"
227
            veinfo 4 SONAME="${SONAME}"
224
            veinfo 4 SONAME="${SONAME}"
225
            if ${LIBPERL} ; then
226
               veinfo 1 "Locating ebuilds linked against libperl  -- new lib: ${SONAME} "
227
            fi
228
        fi
228
        fi
229
    fi
229
    fi
230
230

Return to bug 686168