/[Semantic-Engine]/EPrints/index.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /EPrints/index.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 8 by dpavlin, Fri Jun 29 14:53:14 2007 UTC revision 13 by dpavlin, Fri Jun 29 18:46:45 2007 UTC
# Line 3  Line 3 
3  use strict;  use strict;
4  use Semantic::API;  use Semantic::API;
5  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
6    
7  use EPrints qw/_x/;  use EPrints qw/_x/;
8    
9  use lib '/home/dpavlin/stem-hr/';  use lib '/home/dpavlin/stem-hr/';
10  use StemHR;  use StemHR;
11    
# Line 51  while (my $row = $sth->fetchrow_hashref Line 53  while (my $row = $sth->fetchrow_hashref
53    
54          warn "body: $body\n" if $debug;          warn "body: $body\n" if $debug;
55    
56      $indexer->index( $row->{id}, join(" ", @body, $body ) );          $body .= EPrints->fulltext_content;
57    
58            $indexer->index( $row->{id}, join(" ", @body, $body ) );
59          $total++;          $total++;
60          print STDERR _x( $row->{id}, " ", $row->{title} ), "\n";          print STDERR _x( $row->{id}, " ", $row->{title} ), "\n";
61  }  }
Legend:
Removed from v.8  
changed lines
  Added in v.13
  ViewVC Help
Powered by ViewVC 1.1.26