diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-12-22 17:43:23 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-12-22 17:43:23 +0000 |
commit | a9c7dd5f52b7f4c838d25e9342c705ef922f1118 (patch) | |
tree | 11290eedbaef1b2f2afbe83a40a9f60dc1aab659 /perl-install/pkgs.pm | |
parent | eec5775e4d4372f113510ca537c3e45aeb169364 (diff) | |
download | drakx-backup-do-not-use-a9c7dd5f52b7f4c838d25e9342c705ef922f1118.tar drakx-backup-do-not-use-a9c7dd5f52b7f4c838d25e9342c705ef922f1118.tar.gz drakx-backup-do-not-use-a9c7dd5f52b7f4c838d25e9342c705ef922f1118.tar.bz2 drakx-backup-do-not-use-a9c7dd5f52b7f4c838d25e9342c705ef922f1118.tar.xz drakx-backup-do-not-use-a9c7dd5f52b7f4c838d25e9342c705ef922f1118.zip |
simplify
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r-- | perl-install/pkgs.pm | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 79faf1783..010ba9568 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -877,13 +877,9 @@ sub rpmDbOpenForInstall() { #- there is a bug in rpm 4.2 where all operations for accessing rpmdb files are not #- always done using prefix, we need to setup a symlink in /var/lib/rpm for that ... - unless (-e "/var/lib/rpm") { - #- check if at some time a /var/lib directory has been made. - if (-d "/var/lib") { - symlinkf "$::prefix/var/lib/rpm", "/var/lib/rpm"; - } else { - symlinkf "$::prefix/var/lib", "/var/lib"; - } + if (! -d '/var/lib/rpm') { + mkdir_p('/var/lib'); + symlinkf "$::prefix/var/lib/rpm", "/var/lib/rpm"; } my $db = URPM::DB::open($::prefix, 1); |