From e28acd9663f712b5b4ff73dd5ba2c9f2e52c40dd Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Per=20=C3=98yvind=20Karlsen?= Date: Wed, 13 Oct 2010 20:13:25 +0000 Subject: add Pkg_evr() --- URPM.xs | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/URPM.xs b/URPM.xs index 5b481a3..9f6866a 100644 --- a/URPM.xs +++ b/URPM.xs @@ -1817,6 +1817,15 @@ Pkg_payload_format(pkg) XPUSHs(sv_2mortal(newSVpv(get_name(pkg->h, RPMTAG_PAYLOADFORMAT), 0))); } +void +Pkg_evr(pkg) + URPM::Package pkg + PREINIT: + const char *evr; + PPCODE: + evr = get_evr(pkg); + XPUSHs(sv_2mortal(newSVpv(evr, 0))); + void Pkg_fullname(pkg) URPM::Package pkg -- cgit v1.2.1