aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ManaTools/Shared/GUI/EventHandlerRole.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/ManaTools/Shared/GUI/EventHandlerRole.pm')
-rw-r--r--lib/ManaTools/Shared/GUI/EventHandlerRole.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/ManaTools/Shared/GUI/EventHandlerRole.pm b/lib/ManaTools/Shared/GUI/EventHandlerRole.pm
index 83db71b3..fd785cba 100644
--- a/lib/ManaTools/Shared/GUI/EventHandlerRole.pm
+++ b/lib/ManaTools/Shared/GUI/EventHandlerRole.pm
@@ -278,7 +278,7 @@ sub delWidget {
my $self = shift;
my $widget = shift;
my $event = $self->findWidget($widget);
- $self->delEvent($event) if (defined $event);
+ $self->delEvent($event->name()) if (defined $event);
}
#=============================================================
@@ -361,7 +361,8 @@ sub processEvents {
my $events = $self->events();
# loop all the items
for my $event (values %{$events}) {
- return 0 if(!$event->processEvent($yevent));
+ my $processed = $event->processEvent($yevent);
+ return $processed if $processed >= 0;
}
return 1;
}