--- lib/Grep/Source.pm	2007/02/24 11:16:05	92
+++ lib/Grep/Source.pm	2007/02/24 11:56:18	96
@@ -14,6 +14,7 @@
 use WWW::Mechanize;
 use XML::Feed;
 use URI;
+use HTML::ResolveLink;
 
 use Data::Dump qw/dump/;
 
@@ -107,7 +108,9 @@
 	my $class = $self->feed->source || 'Grep::Source::Feed';
 	Jifty->log->debug("using $class");
 
-	$class->fetch( $self );
+	my $parent = $self;
+	$class->fetch( $parent );
+	undef $parent;
 
 	Grep::Search->finish if $self->new_items;
 
@@ -130,7 +133,13 @@
 
 	my $i = Grep::Model::Item->new();
 
-	my ($ok,$msg) = $i->load_or_create( @_ );
+	my $rec = {@_};
+
+	warn "resolving links";
+	my $resolver = HTML::ResolveLink->new( base => $rec->{link} );
+	$rec->{content} = $resolver->resolve( $rec->{content} );
+
+	my ($ok,$msg) = $i->load_or_create( %$rec );
 
 	$msg ||= '';