aboutsummaryrefslogtreecommitdiffstats
path: root/URPM.xs
diff options
context:
space:
mode:
authorPer Øyvind Karlsen <peroyvind@mandriva.org>2009-07-26 16:06:19 +0000
committerPer Øyvind Karlsen <peroyvind@mandriva.org>2009-07-26 16:06:19 +0000
commit20b1ebb07255184eb0166c8a0129f1d2b147c4bb (patch)
tree3071707e1012339c4b3db8dbef3699773eb594a3 /URPM.xs
parent8b8aa2fd2b7f611540d8e9206e26a82a9b905e5a (diff)
downloadperl-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.xs18
1 files changed, 18 insertions, 0 deletions
diff --git a/URPM.xs b/URPM.xs
index b1e378a..d23925d 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -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