diff options
author | Anne Nicolas <ennael@mageia.org> | 2011-03-09 18:15:03 +0000 |
---|---|---|
committer | Anne Nicolas <ennael@mageia.org> | 2011-03-09 18:15:03 +0000 |
commit | a37966cf8915ddfc98403294ff4a6e19d8fe3562 (patch) | |
tree | 45e6c9578751aa24566d81f323b7403fab70a1b1 /perl-install | |
parent | 4fc5cc42b766ff4f2c81cdd07ff2625794761ec0 (diff) | |
download | drakx-a37966cf8915ddfc98403294ff4a6e19d8fe3562.tar drakx-a37966cf8915ddfc98403294ff4a6e19d8fe3562.tar.gz drakx-a37966cf8915ddfc98403294ff4a6e19d8fe3562.tar.bz2 drakx-a37966cf8915ddfc98403294ff4a6e19d8fe3562.tar.xz drakx-a37966cf8915ddfc98403294ff4a6e19d8fe3562.zip |
fix partition_table_initialize variables
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/fsedit.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 46785b64b..2db6f92d0 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -623,7 +623,7 @@ sub partition_table_clear_and_initialize { } sub partition_table_initialize { - my ($lvms, $hd, $o_in, $b_warn, $o_type) = @_; + my ($lvms, $hd, $o_in, $o_type, $b_warn) = @_; partition_table::initialize($hd, $o_type); if ($hd->isa('partition_table::lvm')) { if ($b_warn && $o_in) { |