diff options
| -rw-r--r-- | src/MTools/Comp/MMultiSelection.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/MTools/Comp/MMultiSelection.pm b/src/MTools/Comp/MMultiSelection.pm index d79f64b..e7b7ea4 100644 --- a/src/MTools/Comp/MMultiSelection.pm +++ b/src/MTools/Comp/MMultiSelection.pm @@ -768,7 +768,7 @@ sub getSelection { my ($self, $plan) = @_; if (!defined $plan) {$plan = $self -> getSelectedPlan ();} my @selection; - if (defined $self -> {__objects} [$plan]) + if (defined $plan && defined $self -> {__objects} [$plan]) { my @items = @{$self -> {__objects} [$plan]}; for (my $i = 0; $i < @items; $i++) |