diff options
Diffstat (limited to 'script/bookmarks_load.pl')
-rwxr-xr-x | script/bookmarks_load.pl | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/script/bookmarks_load.pl b/script/bookmarks_load.pl index 7b16fa1..6433f24 100755 --- a/script/bookmarks_load.pl +++ b/script/bookmarks_load.pl @@ -30,16 +30,20 @@ for my $link (@$links) { my $dblink=Bookmarks::M::DB::Links->find_or_create({ url => $link->{href}, }); - if (!Bookmarks::Utils::check_link($link->{href})) { - warn "Link $link->{href} non valido, marco come tale\n"; - $link->{description}.=' [INVALID]'; - } + if (!Bookmarks::Utils::check_link($link->{href})) { + warn "Link $link->{href} non valido, marco come tale\n"; + $link->{description}.=' [INVALID]'; + } + else { + my ($icon,$type)=Bookmarks::Utils::get_site_icon($link->{href}); + $dblink->set_icon($icon); + $dblink->icon_type($type); + } $link->{created}||=time(); $link->{modified}||=time(); while (my ($f1,$f2) = each %fields) { $dblink->$f2($link->{$f1}); } - $dblink->set_icon(Bookmarks::Utils::get_site_icon($link->{href})); $dblink->update(); Bookmarks::M::DB::LinksTags->search({link => $dblink->pk()})->delete_all(); |