aboutsummaryrefslogtreecommitdiffstats
path: root/URPM.xs
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-11-19 18:26:47 +0000
committerThierry Vignaud <tv@mageia.org>2012-11-19 18:26:47 +0000
commit350c7f12726a05e54a04119c1540e2dbe07b8760 (patch)
tree816d8e03e538d05ff297f33881db09b41dddcf1c /URPM.xs
parentb9e25134ec05d8532cd567e34e15f8f53cdbdef3 (diff)
downloadperl-URPM-350c7f12726a05e54a04119c1540e2dbe07b8760.tar
perl-URPM-350c7f12726a05e54a04119c1540e2dbe07b8760.tar.gz
perl-URPM-350c7f12726a05e54a04119c1540e2dbe07b8760.tar.bz2
perl-URPM-350c7f12726a05e54a04119c1540e2dbe07b8760.tar.xz
perl-URPM-350c7f12726a05e54a04119c1540e2dbe07b8760.zip
drop header_filename (long obsolete, no more use)
Diffstat (limited to 'URPM.xs')
-rw-r--r--URPM.xs21
1 files changed, 0 insertions, 21 deletions
diff --git a/URPM.xs b/URPM.xs
index 7a2db58..fb2d41f 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -1814,27 +1814,6 @@ Pkg_filename(pkg)
mXPUSHs(newSVpvf("%s.%s.rpm", nvr, arch));
}
-# deprecated
-void
-Pkg_header_filename(pkg)
- URPM::Package pkg
- PPCODE:
- if (pkg->info) {
- char *eon;
-
- if ((eon = strchr(pkg->info, '@')) != NULL) {
- mXPUSHs(newSVpv(pkg->info, eon-pkg->info));
- }
- } else if (pkg->h) {
- char buff[1024];
- char *p = buff;
- char *nvr = headerGetAsString(pkg->h, RPMTAG_NVR);
- char *arch = get_arch(pkg->h);
-
- p += snprintf(buff, sizeof(buff), "%s.%s", nvr, arch);
- mXPUSHs(newSVpv(buff, p-buff));
- }
-
void
Pkg_id(pkg)
URPM::Package pkg