From b964779cb665500c8e9fa48b32d1654779d6152e Mon Sep 17 00:00:00 2001 From: Damien Chaumette 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/standalone/drakconnect') 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