summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-10-20 16:02:51 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-10-20 16:02:51 +0000
commit22849669f61beb6a5b2120142dbdb5fe4971cebe (patch)
tree827404148dbef20acd1421e128424c667f730d51
parent89a0b8ea361cfbb76ab7134bbde229ddc26aa385 (diff)
downloaddrakx-backup-do-not-use-22849669f61beb6a5b2120142dbdb5fe4971cebe.tar
drakx-backup-do-not-use-22849669f61beb6a5b2120142dbdb5fe4971cebe.tar.gz
drakx-backup-do-not-use-22849669f61beb6a5b2120142dbdb5fe4971cebe.tar.bz2
drakx-backup-do-not-use-22849669f61beb6a5b2120142dbdb5fe4971cebe.tar.xz
drakx-backup-do-not-use-22849669f61beb6a5b2120142dbdb5fe4971cebe.zip
old perl_checker compliance
-rw-r--r--perl-install/pkgs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index d03b3be9f..59f82cdcc 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -346,7 +346,7 @@ sub unselectAllPackages($) {
sub urpmidir {
my ($prefix) = @_;
my $v = "$prefix/var/lib/urpmi";
- -l $v && !-e _ and unlink $v and mkdir $v, 0755; #- dangling symlink
+ -l $v && !-e $v and unlink $v and mkdir $v, 0755; #- dangling symlink
-w $v ? $v : '/tmp';
}