summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-03-06 00:15:32 +0000
committerdamien <damien@mandriva.com>2001-03-06 00:15:32 +0000
commitfb2ad33549fbe34a59dd085422cb540656e30ab7 (patch)
tree689f63467cf2846be6ab6c62853574bba5c69ae0 /perl-install
parent8bd7f7c2c925b559cdc00861cde4a0c5a3db0e9e (diff)
downloaddrakx-fb2ad33549fbe34a59dd085422cb540656e30ab7.tar
drakx-fb2ad33549fbe34a59dd085422cb540656e30ab7.tar.gz
drakx-fb2ad33549fbe34a59dd085422cb540656e30ab7.tar.bz2
drakx-fb2ad33549fbe34a59dd085422cb540656e30ab7.tar.xz
drakx-fb2ad33549fbe34a59dd085422cb540656e30ab7.zip
use set_in_hash
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 1bdea6721..1245508cb 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -427,7 +427,7 @@ sub write_fstab($;$$) {
sub merge_fstabs {
my ($fstab, $manualFstab) = @_;
my %l; $l{$_->{device}} = $_ foreach @$manualFstab;
- %$_ = (%$_, %{$l{$_->{device}} || next}) foreach @$fstab;
+ set_in_hash($_, $l{$_->{device}}) foreach @$fstab;
}
#sub check_mount_all_fstab($;$) {