diff options
Diffstat (limited to 'perl-install/diskdrake/interactive.pm')
| -rw-r--r-- | perl-install/diskdrake/interactive.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index 6678c37d1..777184069 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -987,12 +987,12 @@ sub Add2LVM { require lvm; if (!ref $lvm) { # create new lvm - my $n = 0; - while (member("vg$n", @lvm_names)) { + my $n; my $str = "vg-mga"; + while (member("$str$n", @lvm_names)) { $n++; } - my $name = "vg$n"; + my $name = "$str$n"; $in->ask_from_({ title => N("LVM name"), messages => N("Enter a name for the new LVM volume group"), focus_first => 1, |