From c3aa79310aa4f053defb0e8ef74cca9f5512d8cf Mon Sep 17 00:00:00 2001 From: Faik Uygur Date: Mon, 9 Nov 2009 10:02:33 +0000 Subject: [PATCH] * KeepSpecial should control pod file removal, not actionapi's perl install * Remove .packlist files --- pisi/actionsapi/perlmodules.py | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/pisi/actionsapi/perlmodules.py b/pisi/actionsapi/perlmodules.py index aa91c835..7ec369d2 100644 --- a/pisi/actionsapi/perlmodules.py +++ b/pisi/actionsapi/perlmodules.py @@ -74,11 +74,13 @@ def install(parameters = 'install'): if system('perl Build install'): raise MakeError, _('perl install failed.') - fixLocalPod() + removePacklist() -def fixLocalPod(): - podFiles = glob.glob('%s/usr/lib/*/*/*/perllocal.pod' % get.installDIR()) - - for podFile in podFiles: - if can_access_file(podFile): - unlink(podFile) +def removePacklist(): + ''' cleans .packlist file from perl packages ''' + path = '%s/%s' % (get.installDIR(), "/usr/lib/perl5/vendor_perl/%s/%s-linux-thread-multi/auto/" % (get.curPERL(), get.HOST().split("-")[0])) + for root, dirs, files in os.walk(path): + for packFile in files: + if packFile == ".packlist": + if can_access_file('%s/%s' % (root, packFile)): + unlink('%s/%s' % (root, packFile))