aboutsummaryrefslogtreecommitdiffstats
path: root/AdminPanel/Hosts/GHosts.pm
diff options
context:
space:
mode:
Diffstat (limited to 'AdminPanel/Hosts/GHosts.pm')
-rw-r--r--AdminPanel/Hosts/GHosts.pm12
1 files changed, 10 insertions, 2 deletions
diff --git a/AdminPanel/Hosts/GHosts.pm b/AdminPanel/Hosts/GHosts.pm
index 91959297..d55daaf1 100644
--- a/AdminPanel/Hosts/GHosts.pm
+++ b/AdminPanel/Hosts/GHosts.pm
@@ -28,7 +28,7 @@ use utf8;
use Glib;
use yui;
-#use AdminPanel::Shared;
+use AdminPanel::Shared;
use AdminPanel::Hosts::hosts;
=head1 VERSION
@@ -174,7 +174,6 @@ sub setupTable {
$tblItem = new yui::YTableItem($host->{'ip'},$host->{'hosts'}[0],$aliases);
$self->table->addItem($tblItem);
}
-
}
sub manageHostsDialog {
@@ -256,6 +255,15 @@ sub manageHostsDialog {
}
elsif ($widget == $remButton) {
# implement deletion dialog
+ if(AdminPanel::Shared::ask_YesOrNo("Confirmation","Are you sure to drop this host?") == 1){
+ my $tblItem = yui::toYTableItem($self->table->selectedItem());
+ # drop the host using the ip
+ $self->cfgHosts->_dropHost($tblItem->cell(0)->label());
+ }
+ }elsif ($widget == $okButton) {
+ # write changes
+ $self->cfgHosts->_writeHosts();
+ last;
}
}
}