Changeset 205 for Search-Namazu

Show
Ignore:
Timestamp:
03/14/06 17:31:18 (6 years ago)
Author:
knok
Message:

Added size attribute in Result class.

Location:
Search-Namazu/trunk
Files:
3 modified

Legend:

Unmodified
Added
Removed

  • Search-Namazu/trunk/ChangeLog

    r204 r205  
    112006-03-14  NOKUBI Takatsugu  <knok@daionet.gr.jp> 
     2 
     3        * Namazu.{xs,pm} : Added size attribute. 
    24 
    35        * Namazu.pm: Added more error status. 

  • Search-Namazu/trunk/Namazu.pm

    r204 r205  
    155155It returns author. 
    156156 
     157=head3 size 
     158 
     159It returns size. 
     160 
    157161=head1 COPYRIGHT 
    158162 
    … …  
    287291 
    288292sub set { 
    289     my ($self, $score, $uri, $date, $rank, $summary, $title, $author) = @_; 
     293    my ($self, $score, $uri, $date, $rank, $summary, $title, $author, 
     294        $size) = @_; 
    290295    $self->{score} = $score; 
    291296    $self->{uri} = $uri; 
    … …  
    295300    $self->{title} = $title; 
    296301    $self->{author} = $author; 
     302    $self->{size} = $size; 
    297303} 
    298304 
    … …  
    360366} 
    361367 
     368sub size { 
     369    my $self = shift; 
     370    if (@_) { 
     371        my $size = shift; 
     372        $self->{'size'} = $size; 
     373    } 
     374    $self->{'size'}; 
     375} 
     376 
    3623771; 
    363378__END__ 

  • Search-Namazu/trunk/Namazu.xs

    r64 r205  
    6969                AV *retar; 
    7070                NmzResult hlist; 
    71                 char result[4][BUFSIZE]; 
     71                char result[5][BUFSIZE]; 
    7272 
    7373                qstr = SvPV(query, PL_na); 
    … …  
    8383                        nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "title", result[2]); 
    8484                        nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "author", result[3]); 
     85                        nmz_get_field_data(hlist.data[i].idxid, hlist.data[i].docid, "size", result[5]); 
    8586                        ENTER; 
    8687                        SAVETMPS; 
    … …  
    9495                        PUSHs(sv_2mortal(newSVpv(result[2], strlen(result[2])))); 
    9596                        PUSHs(sv_2mortal(newSVpv(result[3], strlen(result[3])))); 
     97                        PUSHs(sv_2mortal(newSVpv(result[3], strlen(result[4])))); 
    9698                        PUTBACK; 
    9799                        perl_call_method("set", G_DISCARD);