--- cvs-head/lib/WAIT/InvertedIndex.pm 2002/04/22 10:09:34 82 +++ cvs-head/lib/WAIT/InvertedIndex.pm 2002/04/27 16:15:31 83 @@ -4,7 +4,7 @@ # Author : Ulrich Pfeifer # Created On : Thu Aug 8 13:05:10 1996 # Last Modified By: Ulrich Pfeifer -# Last Modified On: Sat Apr 20 16:56:29 2002 +# Last Modified On: Mon Apr 22 16:52:01 2002 # Language : CPerl # # (C) Copyright 1996-2002, Ulrich Pfeifer @@ -669,7 +669,7 @@ sub set { my ($self, $attr, $value) = @_; - die "No such indexy attribute: '$attr'" unless $attr eq 'top'; + die "No such index attribute: '$attr'" unless $attr eq 'top'; return delete $self->{reorg} if $value == 0;