summaryrefslogtreecommitdiff
path: root/lib/Bookmarks/M/DB/Links.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Bookmarks/M/DB/Links.pm')
-rw-r--r--lib/Bookmarks/M/DB/Links.pm13
1 files changed, 10 insertions, 3 deletions
diff --git a/lib/Bookmarks/M/DB/Links.pm b/lib/Bookmarks/M/DB/Links.pm
index 92fd74b..1719770 100644
--- a/lib/Bookmarks/M/DB/Links.pm
+++ b/lib/Bookmarks/M/DB/Links.pm
@@ -1,6 +1,6 @@
package Bookmarks::M::DB::Links;
use strict;
-use DBI;
+use MIME::Base64;
for my $col_name (qw(add_date last_access_date)) {
__PACKAGE__->has_a( $col_name => 'DateTime',
@@ -9,9 +9,16 @@ for my $col_name (qw(add_date last_access_date)) {
);
}
-__PACKAGE__->has_many( tags => ['Bookmarks::M::DB::LinksTags' => 'tag'] );
+sub set_icon {
+ my ($self,$icon)=@_;
+ $self->icon(encode_base64($icon));
+}
+sub get_icon {
+ my ($self)=@_;
+ return decode_base64($self->icon());
+}
-__PACKAGE__->data_type( icon => DBI::SQL_BLOB );
+__PACKAGE__->has_many( tags => ['Bookmarks::M::DB::LinksTags' => 'tag'] );
=head1 NAME