diff options
author | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2016-03-09 22:05:42 +0100 |
---|---|---|
committer | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2016-03-09 22:05:42 +0100 |
commit | ad3a1af7de96e4c76b3f9ac9b1539092e81d123a (patch) | |
tree | 343f50d68935c7bd689924f01b7e83316a3fb9ec /lib/gcstar/GCModel.pm | |
parent | 965998f7990b75e58fe5219f9c38a3c24198375a (diff) | |
parent | b9a4e9c8a68dcb6b17617f4f7a5ad5ad3298bfa9 (diff) |
Merge tag 'upstream/1.7.1'
Upstream version 1.7.1
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}; } |