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

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

revision 252 by dpavlin, Thu Dec 15 17:01:04 2005 UTC revision 253 by dpavlin, Thu Dec 15 17:01:10 2005 UTC
# Line 11  WebPAC::Normalize - data mungling for no Line 11  WebPAC::Normalize - data mungling for no
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  =head1 SYNOPSIS  =head1 SYNOPSIS
21    
# Line 464  sub fill_in { Line 464  sub fill_in {
464                  if ($self->{'lookup'}) {                  if ($self->{'lookup'}) {
465                          if ($self->{'lookup'}->can('lookup')) {                          if ($self->{'lookup'}->can('lookup')) {
466                                  my @lookup = $self->{lookup}->lookup($format);                                  my @lookup = $self->{lookup}->lookup($format);
467                                  $log->debug('lookup $format', join(", ", @lookup));                                  $log->debug("lookup $format", join(", ", @lookup));
468                                  return @lookup;                                  return @lookup;
469                          } else {                          } else {
470                                  $log->warn("Have lookup object but can't invoke lookup method");                                  $log->warn("Have lookup object but can't invoke lookup method");

Legend:
Removed from v.252  
changed lines
  Added in v.253

  ViewVC Help
Powered by ViewVC 1.1.26