/[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 7 by dpavlin, Sat Jul 16 14:44:38 2005 UTC revision 8 by dpavlin, Sat Jul 16 16:48:35 2005 UTC
# Line 202  Fetch next record from database. It will Line 202  Fetch next record from database. It will
202    
203   my $rec = $webpac->fetch_rec;   my $rec = $webpac->fetch_rec;
204    
205    You should rearly have the need to call this function directly. Instead use
206    C<fetch_data_structure> which returns normalised data.
207    
208  =cut  =cut
209    
210  sub fetch_rec {  sub fetch_rec {
# Line 234  sub fetch_rec { Line 237  sub fetch_rec {
237          }          }
238  }  }
239    
240    =head2 fetch_data_structure
241    
242    Fetch data structure of next record from database.
243    
244     my @ds = $webpac->fetch_data_structure;
245    
246    =cut
247    
248    sub fetch_data_structure {
249            my $self = shift;
250    
251            return $self->data_structure(
252                    $self->fetch_rec(@_)
253            );
254    }
255    
256  =head2 mfn  =head2 mfn
257    
258  Returns current record number (MFN).  Returns current record number (MFN).
Legend:
Removed from v.7  
changed lines
  Added in v.8
  ViewVC Help
Powered by ViewVC 1.1.26