diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Bookmarks/M/DB/Links.pm | 2 | ||||
| -rw-r--r-- | lib/Bookmarks/M/DB/Tags.pm | 6 |
2 files changed, 6 insertions, 2 deletions
diff --git a/lib/Bookmarks/M/DB/Links.pm b/lib/Bookmarks/M/DB/Links.pm index 3ae761d..92fd74b 100644 --- a/lib/Bookmarks/M/DB/Links.pm +++ b/lib/Bookmarks/M/DB/Links.pm @@ -11,7 +11,7 @@ for my $col_name (qw(add_date last_access_date)) { __PACKAGE__->has_many( tags => ['Bookmarks::M::DB::LinksTags' => 'tag'] ); -__PACKAGE__->data_type( icon => DBI::SQL_BINARY ); +__PACKAGE__->data_type( icon => DBI::SQL_BLOB ); =head1 NAME diff --git a/lib/Bookmarks/M/DB/Tags.pm b/lib/Bookmarks/M/DB/Tags.pm index c1e1f0b..732c8b7 100644 --- a/lib/Bookmarks/M/DB/Tags.pm +++ b/lib/Bookmarks/M/DB/Tags.pm @@ -40,7 +40,11 @@ sub get_all_tags_by_popularity { sub ordered_links { my ($self)=@_; my @links=$self->links(); - return sort {$a->access_count <=> $b->access_count} @links; + return sort { + ($a->access_count || 0) + <=> + ($b->access_count || 0) + } @links; } =head1 NAME |