diff options
author | Mathieu Arnold <mat@FreeBSD.org> | 2017-01-19 15:06:38 +0000 |
---|---|---|
committer | Mathieu Arnold <mat@FreeBSD.org> | 2017-01-19 15:06:38 +0000 |
commit | adcd75b82386d63122844a0e432a70270dbb5d24 (patch) | |
tree | d0c4dfb7ca5e3e03f9c2e423772e7babc7c32420 | |
parent | bfc4fb988d1728e31c1b430fc963c2013074ab52 (diff) | |
download | ports-adcd75b82386d63122844a0e432a70270dbb5d24.tar.gz ports-adcd75b82386d63122844a0e432a70270dbb5d24.zip |
Notes
-rw-r--r-- | Mk/Scripts/qa.sh | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/Mk/Scripts/qa.sh b/Mk/Scripts/qa.sh index 878279c522e8..3330bdb7db51 100644 --- a/Mk/Scripts/qa.sh +++ b/Mk/Scripts/qa.sh @@ -737,6 +737,20 @@ sonames() { EOT } +perlcore_port_module_mapping() { + case "$1" in + Net) + echo "Net::Config" + ;; + libwww) + echo "LWP" + ;; + *) + echo "$1" | sed -e 's/-/::/g' + ;; + esac +} + perlcore() { local portname version module gotsome [ -x "${LOCALBASE}/bin/corelist" ] || return 0 @@ -744,7 +758,7 @@ perlcore() { portname=$(expr "${dep}" : ".*/p5-\(.*\)") if [ -n "${portname}" ]; then gotsome=1 - module=$(echo ${portname}|sed -e 's/-/::/g') + module=$(perlcore_port_module_mapping "${portname}") version=$(expr "${dep}" : ".*>=*\([^:<]*\)") while read l; do |