diff options
author | Per Øyvind Karlsen <peroyvind@mandriva.org> | 2009-07-26 16:06:19 +0000 |
---|---|---|
committer | Per Øyvind Karlsen <peroyvind@mandriva.org> | 2009-07-26 16:06:19 +0000 |
commit | 20b1ebb07255184eb0166c8a0129f1d2b147c4bb (patch) | |
tree | 3071707e1012339c4b3db8dbef3699773eb594a3 /URPM.xs | |
parent | 8b8aa2fd2b7f611540d8e9206e26a82a9b905e5a (diff) | |
download | perl-URPM-20b1ebb07255184eb0166c8a0129f1d2b147c4bb.tar perl-URPM-20b1ebb07255184eb0166c8a0129f1d2b147c4bb.tar.gz perl-URPM-20b1ebb07255184eb0166c8a0129f1d2b147c4bb.tar.bz2 perl-URPM-20b1ebb07255184eb0166c8a0129f1d2b147c4bb.tar.xz perl-URPM-20b1ebb07255184eb0166c8a0129f1d2b147c4bb.zip |
add support for %disttag & %distepoch
Diffstat (limited to 'URPM.xs')
-rw-r--r-- | URPM.xs | 18 |
1 files changed, 18 insertions, 0 deletions
@@ -2243,6 +2243,24 @@ Pkg_dirnames(pkg) xpush_simple_list_str(pkg->h, RPMTAG_DIRNAMES); SPAGAIN; +void Pkg_distepoch(pkg) + URPM::Package pkg + PPCODE: +#ifdef RPMTAG_DISTEPOCH + if (pkg->h) { + XPUSHs(sv_2mortal(newSVpv_utf8(get_name(pkg->h, RPMTAG_DISTEPOCH), 0))); + } +#else + croak("distepoch isn't available with this rpm version"); +#endif + +void Pkg_disttag(pkg) + URPM::Package pkg + PPCODE: + if (pkg->h) { + XPUSHs(sv_2mortal(newSVpv_utf8(get_name(pkg->h, RPMTAG_DISTTAG), 0))); + } + void Pkg_filelinktos(pkg) URPM::Package pkg |