diff options
Diffstat (limited to 'perl-install/standalone/drakhosts')
-rw-r--r-- | perl-install/standalone/drakhosts | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/standalone/drakhosts b/perl-install/standalone/drakhosts index 23441d1e5..e6b81a100 100644 --- a/perl-install/standalone/drakhosts +++ b/perl-install/standalone/drakhosts @@ -142,7 +142,7 @@ sub add_modify_entry { COLUMN_ALIAS, $listhosts[$i]{alias}, ); $dialog->destroy; - write_conf_hosts(); +# write_conf_hosts(); }, }, ), @@ -162,7 +162,7 @@ sub remove_entry { $model->remove($iter); splice @listhosts, $i, 1; } - write_conf_hosts(); +# write_conf_hosts(); } sub create_model() { @@ -249,6 +249,9 @@ $W->add(gtkpack_(Gtk2::VBox->new(0,0), err_dialog(N("Error"), N("Failed to remove host.") . "\n\n" . $err); } }), + 0, gtksignal_connect(Gtk2::Button->new(N("Apply")), clicked => sub { + write_conf_hosts(); + }), if_($::isEmbedded, 0, gtksignal_connect(Gtk2::Button->new(N("Quit")), clicked => sub { ugtk2->exit })), ), ), |