Parent Directory | Revision Log | Patch
revision 391 by dpavlin, Wed Jul 21 16:18:45 2004 UTC | revision 392 by dpavlin, Wed Jul 21 16:58:27 2004 UTC | |
---|---|---|
# | Line 79 while (my $rec = $webpac->fetch_rec) { | Line 79 while (my $rec = $webpac->fetch_rec) { |
79 | } | } |
80 | } | } |
81 | ||
82 | my $f = $filename; | |
83 | $f =~ s!out/!!; | |
84 | ||
85 | # save into index | # save into index |
86 | foreach my $ds (@ds) { | foreach my $ds (@ds) { |
87 | next if (! $ds->{'swish'}); | next if (! $ds->{'swish'}); |
88 | ||
89 | $index->insert( | $index->insert( |
90 | index_name => $ds->{'tag'}, | index_name => $ds->{'tag'}, |
91 | path => $filename, | path => $f, |
92 | headline => $headline, | headline => $headline, |
93 | words => join(" ",@{$ds->{'swish'}}) | words => join(" ",@{$ds->{'swish'}}) |
94 | ); | ); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |