--- trunk/Estraier.pm	2006/01/07 01:21:28	61
+++ trunk/Estraier.pm	2006/01/07 02:40:57	62
@@ -525,9 +525,7 @@
 	my $self = {@_};
 	bless($self, $class);
 
-	foreach my $f (qw/uri attrs snippet keywords/) {
-		croak "missing $f for ResultDocument" unless defined($self->{$f});
-	}
+	croak "missing uri for ResultDocument" unless defined($self->{uri});
 
 	$self ? return $self : return undef;
 }