installed-deps-perl-subslot-rebuild: reimplement in terms of antislot…

… match changelog: reimplement subslot rebuild extraction using new qdepends antislot matching
gentoo-perl · Jun 22, 2019 · b5c2b90 · b5c2b90
1 parent 07b03be
commit b5c2b90
Show file tree

Hide file tree

Showing 4 changed files with 1,112 additions and 933 deletions.
diff --git a/Changes b/Changes
@@ -2,6 +2,7 @@
  - Support functions that match against ABIs up to perl 5.40
  - installed-match-atom reimpmented in terms of new qlist
  - reimplement installed-deps-atom mechanic w/ new portage-utils
+ - reimplement subslot rebuild extraction using new qdepends antislot matching
 
 0.3.1 2017-10-12/18
  - blacklist virtual/perl-ExtUtils-Command and virtual/perl-Package-Constants

diff --git a/libexec/installed-deps-perl-subslot-rebuild b/libexec/installed-deps-perl-subslot-rebuild
@@ -10,14 +10,10 @@ set -euo pipefail
 subslot=$1;
 
 shift
-require_bin xargs sys-apps/findutils
-require_bin qatom app-portage/portage-utils
 require_bin qdepends app-portage/portage-utils
-require_bin sed sys-apps/sed
 require_bin sort sys-apps/coreutils
 
-regex=$(dorun print-excluded-abi-regex "${subslot}")
-dorun installed-deps-atom "${regex}"
+dorun installed-deps-atom "^dev-lang/perl:0/${subslot}"
 
 # help: Invocation:
 # help:   gentoo-perl installed-deps-perl-subslot-rebuild [perl-subslot-version]

diff --git a/t/cmd/installed-deps-perl-subslot-rebuild.t.sh b/t/cmd/installed-deps-perl-subslot-rebuild.t.sh
@@ -13,5 +13,5 @@ bash bin/gentoo-perl installed-deps-perl-subslot-rebuild 5.20
 echo
 
 echo "==== [ bin/gentoo-perl installed-deps-perl-subslot-rebuild 5.21 ] ===="
-bash bin/gentoo-perl installed-deps-perl-subslot-rebuild 5.21 && die "FAIL: Expected INVALID ABI Fails"
+bash bin/gentoo-perl installed-deps-perl-subslot-rebuild 5.21
 echo