From ceb0403ab456ebaa192031871b2cb56b04f755ab Mon Sep 17 00:00:00 2001
From: Eugeni Dodonov <eugeni@mandriva.org>
Date: Tue, 17 Mar 2009 13:30:47 +0000
Subject: Netprofile: selecting correct netprofile for cloning (#26562 #26776
 #29303 #29271 #31721).

---
 bin/draknetprofile | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'bin/draknetprofile')

diff --git a/bin/draknetprofile b/bin/draknetprofile
index 45438a0..13ceabc 100755
--- a/bin/draknetprofile
+++ b/bin/draknetprofile
@@ -86,6 +86,15 @@ $profiles_list->get_selection->signal_connect('changed' => sub {
 
 sub get_selected_profile() {
     my ($index) = $profiles_list->get_selected_indices;
+    if (not $index ) {
+        my $pc = @{$profiles_list->{data}};
+        my $index = 0;
+        for (my $i = 0; $i < $pc; $i++) {
+            if ( $profiles_list->{data}[$i][0] == 1 ) {
+                $index = $i;
+            }
+        }
+    };
     defined $index && $profiles_list->{data}[$index][1];
 }
 
-- 
cgit v1.2.1