From b964779cb665500c8e9fa48b32d1654779d6152e Mon Sep 17 00:00:00 2001
From: Damien Chaumette <dchaumette@mandriva.com>
Date: Mon, 8 Sep 2003 14:56:07 +0000
Subject: shrink

---
 perl-install/standalone/drakconnect | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect
index 2196a0483..d6668acfa 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -128,13 +128,9 @@ $button_del->signal_connect(clicked => sub {
                                                               my $profile2delete = $combo_dialog->entry->get_text;
                                                               $dialog->destroy;
                                                               Gtk2->main_quit;
-                                                              network::netconnect::del_profile($netcnx, $profile2delete);
-                                                              if ($profile2delete eq $netcnx->{PROFILE}) {
-                                                                  set_profiles("default");
-                                                              } else {
-                                                                  update_profiles();
-                                                              }
-                                                          }),
+                                                              network::netconnect::del_profile($profile2delete);
+                                                              $profile2delete eq $netcnx->{PROFILE} ? set_profiles("default") : update_profiles();
+							  }),
                                        );
                                 $dialog->show_all;
                                 $dialog->run;
-- 
cgit v1.2.1