summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authordakkar <dakkar@luxion>2005-11-09 21:44:02 +0000
committerdakkar <dakkar@luxion>2005-11-09 21:44:02 +0000
commit2690b8a0d7019b68509897881cd152717cb41ed0 (patch)
tree8e53fec264ceba6fdf4189f7696aa1c82e3e405c /lib
parentaggiunta l'icona di default, e corretto il codice icone in generale (diff)
downloadBookmarks-2690b8a0d7019b68509897881cd152717cb41ed0.tar.gz
Bookmarks-2690b8a0d7019b68509897881cd152717cb41ed0.tar.bz2
Bookmarks-2690b8a0d7019b68509897881cd152717cb41ed0.zip
un po' di stylesheet
Diffstat (limited to 'lib')
-rw-r--r--lib/Bookmarks.pm2
-rw-r--r--lib/Bookmarks/C/Main.pm7
-rw-r--r--lib/Bookmarks/M/DB/Tags.pm2
3 files changed, 9 insertions, 2 deletions
diff --git a/lib/Bookmarks.pm b/lib/Bookmarks.pm
index 810a64f..63d6578 100644
--- a/lib/Bookmarks.pm
+++ b/lib/Bookmarks.pm
@@ -1,7 +1,7 @@
package Bookmarks;
use strict;
-use Catalyst qw/-Debug Prototype DefaultEnd/;
+use Catalyst qw/-Debug Prototype DefaultEnd Static::Simple/;
use HTML::Element;
our $VERSION = '0.01';
diff --git a/lib/Bookmarks/C/Main.pm b/lib/Bookmarks/C/Main.pm
index 244abab..b272c64 100644
--- a/lib/Bookmarks/C/Main.pm
+++ b/lib/Bookmarks/C/Main.pm
@@ -192,6 +192,13 @@ sub new {
return bless {c=>$c,base=>$c->req->base()},$class;
}
+sub stylesheet {
+ my ($self)=@_;
+ return URI->new(
+ $self->{base} . 'style.css'
+ )->as_string();
+}
+
sub tag_info {
my ($self, $tag)=@_;
return URI->new(
diff --git a/lib/Bookmarks/M/DB/Tags.pm b/lib/Bookmarks/M/DB/Tags.pm
index cc675f7..4ca832a 100644
--- a/lib/Bookmarks/M/DB/Tags.pm
+++ b/lib/Bookmarks/M/DB/Tags.pm
@@ -18,7 +18,7 @@ __PACKAGE__->set_sql('popularity', <<'END_SQL');
SELECT tags.pk, COUNT(links_tags.link) AS how_many
FROM tags, links_tags
WHERE tags.pk = links_tags.tag
-GROUP BY links_tags.tag
+GROUP BY tags.pk
ORDER BY how_many DESC
END_SQL