From 27e2670865af8bee67d6ffca83195981b2f3d8b0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Per=20=C3=98yvind=20Karlsen?= Date: Fri, 18 Jul 2008 18:09:10 +0000 Subject: add filelinktos() & dirnames() to URPM::Package --- URPM.pm | 4 ++++ URPM.xs | 16 ++++++++++++++++ 2 files changed, 20 insertions(+) diff --git a/URPM.pm b/URPM.pm index a6552bb..3cc75c6 100644 --- a/URPM.pm +++ b/URPM.pm @@ -509,6 +509,8 @@ Writes a line of information in a synthesis file. =item $package->description() +=item $package->dirnames() + =item $package->distribution() =item $package->epoch() @@ -517,6 +519,8 @@ Writes a line of information in a synthesis file. =item $package->exclusivearchs() +=item $package->filelinktos() + =item $package->files() List of files in this rpm. diff --git a/URPM.xs b/URPM.xs index 3e28670..d6bc566 100644 --- a/URPM.xs +++ b/URPM.xs @@ -2270,6 +2270,22 @@ Pkg_exclusivearchs(pkg) xpush_simple_list_str(pkg->h, RPMTAG_EXCLUSIVEARCH); SPAGAIN; +void +Pkg_dirnames(pkg) + URPM::Package pkg + PPCODE: + PUTBACK; + xpush_simple_list_str(pkg->h, RPMTAG_DIRNAMES); + SPAGAIN; + +void +Pkg_filelinktos(pkg) + URPM::Package pkg + PPCODE: + PUTBACK; + xpush_simple_list_str(pkg->h, RPMTAG_FILELINKTOS); + SPAGAIN; + void Pkg_files(pkg) URPM::Package pkg -- cgit v1.2.1