This queue is for tickets about the HTML-TagCloud CPAN distribution.

Report information
The Basics
Id:
38778
Status:
new
Priority:
Low/Low
Queue:

People
Owner:
Nobody in particular
Requestors:
ask [...] develooper.com
Cc:
AdminCc:

BugTracker
Severity:
(no value)
Broken in:
(no value)
Fixed in:
(no value)



CC: Ask Bjørn Hansen <ask@develooper.com>
Subject: [PATCH] use css class instead of id to allow more than one tagcloud per page
Date: Thu, 28 Aug 2008 01:18:00 -0700
To: bug-HTML-TagCloud@rt.cpan.org
From: Ask Bjørn Hansen <ask@develooper.com>
--- lib/perl5/HTML/TagCloud.pm | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/perl5/HTML/TagCloud.pm b/lib/perl5/HTML/TagCloud.pm index a08a19c..72d867f 100644 --- a/lib/perl5/HTML/TagCloud.pm +++ b/lib/perl5/HTML/TagCloud.pm @@ -85,7 +85,7 @@ sub html { return ""; } elsif ($ntags == 1) { my $tag = $tags[0]; - return qq{<div id="htmltagcloud"><span class="tagcloud1"><a href="}. + return qq{<div class="htmltagcloud"><span class="tagcloud1"><a href="}. $tag->{url}.qq{">}.$tag->{name}.qq{</a></span></div>\n}; } @@ -98,7 +98,7 @@ sub html { $html .= qq{<span class="tagcloud}.$tag->{level}.qq{"><a href="}.$tag->{url}. qq{">}.$tag->{name}.qq{</a></span>\n}; } - $html = qq{<div id="htmltagcloud"> + $html = qq{<div class="htmltagcloud"> $html</div>}; return $html; } -- 1.6.0


This service runs on Request Tracker, is sponsored by The Perl Foundation, and maintained by Best Practical Solutions.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.