From 11827be26ff094c72006d2e6fade44378b26ecb9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?S=2E=C3=87a=C4=9Flar=20Onur?= Date: Wed, 28 Jun 2006 13:52:49 +0000 Subject: [PATCH] *.pod 3 yerde olabilir --- pisi/actionsapi/perlmodules.py | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/pisi/actionsapi/perlmodules.py b/pisi/actionsapi/perlmodules.py index 446cdf1d..b51e5876 100644 --- a/pisi/actionsapi/perlmodules.py +++ b/pisi/actionsapi/perlmodules.py @@ -74,7 +74,13 @@ def install(parameters = 'install'): if system('perl Build install'): raise MakeError, _('perl install failed.') - podFile = "%s/usr/lib/perl5/%s/i686-linux/perllocal.pod" % (get.installDIR(), get.curPERL()) + fixLocalPod() - if can_access_file(podFile): - unlink(podFile) +def fixLocalPod(): + podFiles = [ "%s/usr/lib/perl5/vendor_perl/%s/i686-linux/perllocal.pod" % (get.installDIR(), get.curPERL()), + "%s/usr/lib/perl5/%s/i686-linux/perllocal.pod" % (get.installDIR(), get.curPERL()), + "%s/usr/lib/perl5/site_perl/%s/perllocal.pod" % (get.installDIR(), get.curPERL())] + + for podFile in podFiles: + if can_access_file(podFile): + unlink(podFile)