diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index cd1599b2d..f492dd2c4 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -21,6 +21,7 @@ 7.4.20 - fix: Assets with no committed versions may be left as orphans when parent is purged + - fix: Tag cloud limited was to 50 least commonly used tags 7.4.19 - fix: Import Package does nothing when re-importing trashed package diff --git a/lib/WebGUI/Keyword.pm b/lib/WebGUI/Keyword.pm index a5fbc9adc..b09bf0f9d 100644 --- a/lib/WebGUI/Keyword.pm +++ b/lib/WebGUI/Keyword.pm @@ -124,7 +124,7 @@ sub generateCloud { my $options = shift; my $display = $options->{displayAsset} || $options->{startAsset}; my $sth = $self->session->db->read("select count(*) as keywordTotal, keyword from assetKeyword - left join asset using (assetId) where lineage like ? group by keyword order by keywordTotal limit 50", + left join asset using (assetId) where lineage like ? group by keyword order by keywordTotal desc limit 50", [ $options->{startAsset}->get("lineage").'%' ]); my $cloud = HTML::TagCloud->new(levels=>$options->{cloudLevels} || 24); while (my ($count, $keyword) = $sth->array) {