really ensure that "identification" section is displayed first

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;