aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-04-14 17:51:16 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-04-14 18:09:41 +0200
commitb5249dafb882fbc105f05853c80fd30503d57a3f (patch)
tree85cfa61c32f394f447e3d767719e9dc3ad622fc1
parent46336d0faed638623c6d7ace1abb3790ac3f8a4c (diff)
downloadperl-URPM-b5249dafb882fbc105f05853c80fd30503d57a3f.tar
perl-URPM-b5249dafb882fbc105f05853c80fd30503d57a3f.tar.gz
perl-URPM-b5249dafb882fbc105f05853c80fd30503d57a3f.tar.bz2
perl-URPM-b5249dafb882fbc105f05853c80fd30503d57a3f.tar.xz
perl-URPM-b5249dafb882fbc105f05853c80fd30503d57a3f.zip
don't push $fullname to callback stack
that's no more needed...
-rw-r--r--NEWS2
-rw-r--r--URPM.xs7
2 files changed, 2 insertions, 7 deletions
diff --git a/NEWS b/NEWS
index f9d430d..332ce11 100644
--- a/NEWS
+++ b/NEWS
@@ -1,5 +1,7 @@
- add support for "elem" callback
(needs rpm >= rpm-4.13.0-0.rc1.28)
+- don't push $fullname to callback stack
+ (need a new urpmi)
Version 5.06 - 12 April 2015
diff --git a/URPM.xs b/URPM.xs
index 99af00a..96cddbb 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -1321,13 +1321,6 @@ static void *rpmRunTransactions_callback(const void *arg,
mPUSHs(newSViv(amount));
mPUSHs(newSViv(total));
}
- // for erasures, the key provided by librpm is always 0, so let's add another parameter (fullname):
- if (h) {
- char *s = headerGetAsString(h, RPMTAG_NVR);
- mPUSHs(newSVpv(s, 0));
- } else {
- PUSHs(&PL_sv_undef);
- }
PUTBACK;
i = call_sv(callback, callback == td->callback_open ? G_SCALAR : G_DISCARD);
SPAGAIN;