/[webpac2]/trunk/lib/WebPAC/Output/KinoSearch.pm
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 /trunk/lib/WebPAC/Output/KinoSearch.pm

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

revision 914 by dpavlin, Tue Oct 30 20:11:04 2007 UTC revision 917 by dpavlin, Tue Oct 30 21:57:36 2007 UTC
# Line 42  type C<search>. Line 42  type C<search>.
42    
43  Open KinoSearch index  Open KinoSearch index
44    
45   my $est = new WebPAC::Output::KinoSearch({   my $out = new WebPAC::Output::KinoSearch({
46          path => '/path/to/invindex',          path => '/path/to/invindex',
47          database => 'demo',          database => 'demo',
48          encoding => 'iso-8859-2',          encoding => 'iso-8859-2',
# Line 69  index. Line 69  index.
69    
70  =back  =back
71    
72    =head2 init
73    
74      $out->init;
75    
76  =cut  =cut
77    
78  sub init {  sub init {
# Line 111  sub init { Line 115  sub init {
115    
116  Adds one entry  Adds one entry
117    
118    $est->add( 42, $ds );    $out->add( 42, $ds );
119    
120  =cut  =cut
121    
# Line 139  sub add { Line 143  sub add {
143    
144  Close index  Close index
145    
146   $index->finish;   $out->finish;
147    
148  =cut  =cut
149    
# Line 152  sub finish { Line 156  sub finish {
156    
157  }  }
158    
 =head2 convert  
   
  my $utf8_string = $self->convert('string in codepage');  
   
 =cut  
   
 sub convert {  
         my $self = shift;  
   
         my $text = shift || return;  
         from_to($text, $self->{encoding}, 'UTF-8');  
         return $text;  
 }  
   
159  =head1 AUTHOR  =head1 AUTHOR
160    
161  Dobrica Pavlinusic, C<< <dpavlin@rot13.org> >>  Dobrica Pavlinusic, C<< <dpavlin@rot13.org> >>
Legend:
Removed from v.914  
changed lines
  Added in v.917
  ViewVC Help
Powered by ViewVC 1.1.26