summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-01-24 20:52:06 +0000
committerThierry Vignaud <tv@mageia.org>2012-01-24 20:52:06 +0000
commitf687228b6c0125b92fd51d33a284d74ca9a4b292 (patch)
tree13c61a9127e7bd5b138cebbbd7e9addff51f3757 /perl-install/diskdrake
parentcc4c1c3b052eaeb9dab5a2851c58a9e946eb63ba (diff)
downloaddrakx-f687228b6c0125b92fd51d33a284d74ca9a4b292.tar
drakx-f687228b6c0125b92fd51d33a284d74ca9a4b292.tar.gz
drakx-f687228b6c0125b92fd51d33a284d74ca9a4b292.tar.bz2
drakx-f687228b6c0125b92fd51d33a284d74ca9a4b292.tar.xz
drakx-f687228b6c0125b92fd51d33a284d74ca9a4b292.zip
(Add2LVM) better default name for new VG (vg-mga, vg-mga1, ...
instead of vg-0, vg-1, ...)
Diffstat (limited to 'perl-install/diskdrake')
-rw-r--r--perl-install/diskdrake/interactive.pm6
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,