Konqueror.pm

package Plagger::Plugin::Subscription::Bookmarks::Konqueror;
use strict;
use base qw( Plagger::Plugin::Subscription::Bookmarks );

use XML::XBEL;

sub load {
    my($self, $context) = @_;
    
    my $xbel = XML::XBEL->new;
    $xbel->parse_file($self->conf->{path});
    my @bookmarks = $xbel->bookmarks();
    $self->find_feed($context, @bookmarks);
}

sub find_feed {
    my($self, $context, @bookmarks) = @_;
    
    foreach my $bookmark(@bookmarks){
	    my $feed = Plagger::Feed->new;
	    $feed->url($bookmark->href());
	    $feed->title($bookmark->title());
        # $feed->tags(\@tags);
	    $context->subscription->add($feed);
    }
}
    
1;