diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2007-09-04 08:11:19 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2007-09-04 08:11:19 +0000 |
commit | b7756ee40c8b9798eb84d817aadf640945086295 (patch) | |
tree | e3fcc18689694707a8c7864a12662e08b55eaacd /perl-install | |
parent | 2d06c5b0b1e5ea7186a0b6493413fd072672c6bc (diff) | |
download | drakx-b7756ee40c8b9798eb84d817aadf640945086295.tar drakx-b7756ee40c8b9798eb84d817aadf640945086295.tar.gz drakx-b7756ee40c8b9798eb84d817aadf640945086295.tar.bz2 drakx-b7756ee40c8b9798eb84d817aadf640945086295.tar.xz drakx-b7756ee40c8b9798eb84d817aadf640945086295.zip |
- add global variable settable via "use_uuid" on kernel cmdline
(it sets global variable $::uuid_by_default)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/fs/wild_device.pm | 2 | ||||
-rw-r--r-- | perl-install/install/NEWS | 2 | ||||
-rw-r--r-- | perl-install/install/install2.pm | 1 |
3 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/fs/wild_device.pm b/perl-install/fs/wild_device.pm index ebb391cdf..be4a43dfd 100644 --- a/perl-install/fs/wild_device.pm +++ b/perl-install/fs/wild_device.pm @@ -83,7 +83,7 @@ sub from_part { 'LABEL=' . $part->{device_LABEL}; } elsif ($part->{device_alias}) { "/dev/$part->{device_alias}"; - } elsif ($part->{prefer_device_UUID} && $part->{device_UUID}) { + } elsif (!$part->{prefer_device} && ($part->{prefer_device_UUID} || $::uuid_by_default) && $part->{device_UUID}) { 'UUID=' . $part->{device_UUID}; } else { my $faked_device = exists $part->{faked_device} ? diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 03a87e848..d180415ad 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,5 @@ +- add global variable settable via "use_uuid" on kernel cmdline + Version 10.4.185 - 4 September 2007, by Pascal "Pixel" Rigaux - fix gnome choice in "choose desktop" step (#33101) diff --git a/perl-install/install/install2.pm b/perl-install/install/install2.pm index 85f42d08e..7536ec35c 100644 --- a/perl-install/install/install2.pm +++ b/perl-install/install/install2.pm @@ -363,6 +363,7 @@ sub main { newt => sub { $o->{interactive} = "curses" }, text => sub { $o->{interactive} = "curses" }, stdio => sub { $o->{interactive} = "stdio" }, + use_uuid => sub { $::uuid_by_default = $v }, kickstart => sub { $::auto_install = $v }, local_install => sub { $::local_install = 1 }, uml_install => sub { $::uml_install = $::local_install = 1 }, |