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

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

revision 618 by dpavlin, Wed Aug 23 14:28:48 2006 UTC revision 619 by dpavlin, Fri Aug 25 12:31:06 2006 UTC
# Line 11  WebPAC::Input::ISIS - support for CDS/IS Line 11  WebPAC::Input::ISIS - support for CDS/IS
11    
12  =head1 VERSION  =head1 VERSION
13    
14  Version 0.04  Version 0.05
15    
16  =cut  =cut
17    
18  our $VERSION = '0.04';  our $VERSION = '0.05';
19    
20    
21  =head1 SYNOPSIS  =head1 SYNOPSIS
# Line 108  sub open_db { Line 108  sub open_db {
108    
109  Return record with ID C<$mfn> from database  Return record with ID C<$mfn> from database
110    
111    my $rec = $self->fetch_rec( $db, $mfn );    my $rec = $self->fetch_rec( $db, $mfn, $filter_coderef);
112    
113  =cut  =cut
114    
115  sub fetch_rec {  sub fetch_rec {
116          my $self = shift;          my $self = shift;
117    
118          my ($isis_db, $mfn) = @_;          my ($isis_db, $mfn, $filter_coderef) = @_;
119    
120          my $rec;          my $rec;
121    
# Line 149  sub fetch_rec { Line 149  sub fetch_rec {
149          } elsif ($self->{have_biblio_isis}) {          } elsif ($self->{have_biblio_isis}) {
150                  $rec = $isis_db->to_hash({                  $rec = $isis_db->to_hash({
151                          mfn => $mfn,                          mfn => $mfn,
152                          include_subfields => 1                          include_subfields => 1,
153                            hash_filter => $filter_coderef,
154                  });                  });
155          } else {          } else {
156                  $self->_get_logger()->logdie("hum? implementation missing?");                  $self->_get_logger()->logdie("hum? implementation missing?");

Legend:
Removed from v.618  
changed lines
  Added in v.619

  ViewVC Help
Powered by ViewVC 1.1.26