diff options
Diffstat (limited to 'lib/gcstar/GCModel.pm')
| -rw-r--r-- | lib/gcstar/GCModel.pm | 19 |
1 files changed, 8 insertions, 11 deletions
diff --git a/lib/gcstar/GCModel.pm b/lib/gcstar/GCModel.pm index 2223e3e..65803ef 100644 --- a/lib/gcstar/GCModel.pm +++ b/lib/gcstar/GCModel.pm @@ -1176,18 +1176,15 @@ our $linkNameSeparator = '##'; sub getGroups { my $self = shift; - - if (!$self->{groupsHash}) + + $self->{groupsHash} = {}; + foreach (@{$self->{groups}}) { - $self->{groupsHash} = {}; - foreach (@{$self->{groups}}) - { - $self->{groupsHash}->{$_->{id}} = { - id => $_->{id}, - label => $_->{label}, - displayed => $self->getDisplayedText($_->{label}) - }; - } + $self->{groupsHash}->{$_->{id}} = { + id => $_->{id}, + label => $_->{label}, + displayed => $self->getDisplayedText($_->{label}) + }; } return $self->{groupsHash}; } |