diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-06-20 23:29:59 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-06-20 23:29:59 +0000 |
commit | fad0b5310f6728db2caaab9b3906af5883293dde (patch) | |
tree | 20dfbdba042ba9a8daee5fa8cb6772b554648735 /perl-install/standalone | |
parent | 24260266edb77211e28ea9740c5b68692011e0d1 (diff) | |
download | drakx-fad0b5310f6728db2caaab9b3906af5883293dde.tar drakx-fad0b5310f6728db2caaab9b3906af5883293dde.tar.gz drakx-fad0b5310f6728db2caaab9b3906af5883293dde.tar.bz2 drakx-fad0b5310f6728db2caaab9b3906af5883293dde.tar.xz drakx-fad0b5310f6728db2caaab9b3906af5883293dde.zip |
really ensure that "identification" section is displayed first
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-x | perl-install/standalone/harddrake2 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index f21f6e9a1..dad12df21 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -302,7 +302,7 @@ $tree->get_selection->signal_connect('changed' => sub { member($field, map { @$_ } values %groups); } keys %device_fields; my @formated; - foreach my $group (sort { $a eq N("Connection") } keys %groups) { + foreach my $group (N("Identification"), grep { $_ ne N("Identification") } keys %groups) { my @fields = @{$groups{$group}}; # have we at least a member in that group? next unless any { member($_, @fields) } @$grouped; |