diff --git a/pisi/actionsapi/get.py b/pisi/actionsapi/get.py index ec65fcfa..0f34e320 100644 --- a/pisi/actionsapi/get.py +++ b/pisi/actionsapi/get.py @@ -48,6 +48,10 @@ def curPYTHON(): (a, b, c, x, y) = sys.version_info return 'python%s.%s' % (a, b) +def curPERL(): + ''' returns currently used perl's version''' + return os.path.realpath("/usr/bin/perl").split("perl")[1] + def ENV(environ): '''returns any given environ variable''' try: diff --git a/pisi/actionsapi/perlmodules.py b/pisi/actionsapi/perlmodules.py index 06925b3b..446cdf1d 100644 --- a/pisi/actionsapi/perlmodules.py +++ b/pisi/actionsapi/perlmodules.py @@ -26,6 +26,7 @@ import pisi.actionsapi.get as get from pisi.actionsapi.shelltools import system from pisi.actionsapi.shelltools import can_access_file from pisi.actionsapi.shelltools import export +from pisi.actionsapi.shelltools import unlink class ConfigureError(pisi.actionsapi.Error): def __init__(self, value=''): @@ -73,4 +74,7 @@ def install(parameters = 'install'): if system('perl Build install'): raise MakeError, _('perl install failed.') -# FIXME: fix_local_pod % update_pod + podFile = "%s/usr/lib/perl5/%s/i686-linux/perllocal.pod" % (get.installDIR(), get.curPERL()) + + if can_access_file(podFile): + unlink(podFile)