aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-06-17 20:38:31 +0000
committerThierry Vignaud <tv@mageia.org>2012-06-17 20:38:31 +0000
commitb1898dc866698d8e103b4b24a635c161dd93ac65 (patch)
tree3a6362e8abbeacd7ea111e15877e5218ad46b039
parent5e6eb5037f411987e994522e640a8efbc4c6a0a5 (diff)
downloadperl-URPM-b1898dc866698d8e103b4b24a635c161dd93ac65.tar
perl-URPM-b1898dc866698d8e103b4b24a635c161dd93ac65.tar.gz
perl-URPM-b1898dc866698d8e103b4b24a635c161dd93ac65.tar.bz2
perl-URPM-b1898dc866698d8e103b4b24a635c161dd93ac65.tar.xz
perl-URPM-b1898dc866698d8e103b4b24a635c161dd93ac65.zip
resplit all functions using return_files() into Pkg_files()
-rw-r--r--URPM.xs21
1 files changed, 15 insertions, 6 deletions
diff --git a/URPM.xs b/URPM.xs
index 0aa61af..8539cf3 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -2076,12 +2076,10 @@ Pkg_buildarchs(pkg)
exclusivearchs = 2
dirnames = 3
filelinktos = 4
- files = 5
files_md5sum = 6
files_owner = 7
files_group = 8
files_flags = 14
- conf_files = 15
changelog_name = 17
changelog_text = 18
PPCODE:
@@ -2097,16 +2095,12 @@ Pkg_buildarchs(pkg)
xpush_simple_list_str(pkg->h, RPMTAG_DIRNAMES); break;
case 4:
xpush_simple_list_str(pkg->h, RPMTAG_FILELINKTOS); break;
- case 5:
- return_files(pkg->h, 0); break;
case 6:
xpush_simple_list_str(pkg->h, RPMTAG_FILEMD5S); break;
case 7:
xpush_simple_list_str(pkg->h, RPMTAG_FILEUSERNAME); break;
case 8:
xpush_simple_list_str(pkg->h, RPMTAG_FILEGROUPNAME); break;
- case 15:
- return_files(pkg->h, FILTER_MODE_CONF_FILES); break;
case 17:
xpush_simple_list_str(pkg->h, RPMTAG_CHANGELOGNAME); break;
case 18:
@@ -2115,6 +2109,21 @@ Pkg_buildarchs(pkg)
SPAGAIN;
void
+Pkg_files(pkg)
+ URPM::Package pkg
+ ALIAS:
+ conf_files = 1
+ PPCODE:
+ PUTBACK;
+ int filter_mode;
+ if (ix == 0)
+ filter_mode = 0;
+ else
+ filter_mode = FILTER_MODE_CONF_FILES;
+ return_files(pkg->h, filter_mode);
+ SPAGAIN;
+
+void
Pkg_files_mtime(pkg)
URPM::Package pkg
ALIAS: