From e2609ae801f5a982a0aef31bbccaff92ae0b33e8 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Tue, 24 Jan 2012 20:52:06 +0000
Subject: (Add2LVM) better default name for new VG (vg-mga, vg-mga1, ...
 instead of vg-0, vg-1, ...)

---
 perl-install/diskdrake/interactive.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl-install/diskdrake/interactive.pm')

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,
-- 
cgit v1.2.1