From ffc1a5378677d9ebc2c7c6687c6321d0766598c5 Mon Sep 17 00:00:00 2001 From: Maarten Vanraes Date: Sat, 23 Jul 2016 09:24:29 +0200 Subject: safeguard against empty names --- lib/ManaTools/Shared/GUI/EventRole.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/ManaTools/Shared/GUI/EventRole.pm b/lib/ManaTools/Shared/GUI/EventRole.pm index 14c91517..24db86e2 100644 --- a/lib/ManaTools/Shared/GUI/EventRole.pm +++ b/lib/ManaTools/Shared/GUI/EventRole.pm @@ -99,12 +99,12 @@ around 'name' => sub { } else { $name = $self->$orig(); - $setting = 1 if (!defined $name); + $setting = 1 if (!defined $name) && $name ne ''; } # return the current name # if it's undef, we need to change this... - if (!defined $name) { + if (!defined $name || $name eq '') { # generate a unique Event name $name = $self->uniqueName($self->eventHandler()); } -- cgit v1.2.1