summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS4
-rw-r--r--perl-install/diskdrake/interactive.pm6
-rw-r--r--perl-install/install/NEWS3
3 files changed, 10 insertions, 3 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index d816409ab..f98fcf27c 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,7 @@
+- diskdrake:
+ o better default name for new VG (vg-mga, vg-mga1, ...
+ instead of vg-0, vg-1, ...)
+
Version 13.77 - 23 January 2012
- add support for XZ modules
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,
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 38eb3a19f..8e15b1f56 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,5 +1,8 @@
- summary:
o list shorewall with iptables* in services
+- diskdrake:
+ o better default name for new VG (vg-mga, vg-mga1, ...
+ instead of vg-0, vg-1, ...)
Version 13.77 - 23 January 2012