summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorDamien Chaumette <dchaumette@mandriva.com>2003-09-08 14:56:07 +0000
committerDamien Chaumette <dchaumette@mandriva.com>2003-09-08 14:56:07 +0000
commitb964779cb665500c8e9fa48b32d1654779d6152e (patch)
tree64571bd103c64f35307f4e4b25dcfc7286ec600e /perl-install
parentec3798f880b10ab8b9bc4a5708649a6791e505a2 (diff)
downloaddrakx-b964779cb665500c8e9fa48b32d1654779d6152e.tar
drakx-b964779cb665500c8e9fa48b32d1654779d6152e.tar.gz
drakx-b964779cb665500c8e9fa48b32d1654779d6152e.tar.bz2
drakx-b964779cb665500c8e9fa48b32d1654779d6152e.tar.xz
drakx-b964779cb665500c8e9fa48b32d1654779d6152e.zip
shrink
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakconnect10
1 files changed, 3 insertions, 7 deletions
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;