/[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 729 by dpavlin, Fri Sep 29 20:18:30 2006 UTC revision 730 by dpavlin, Fri Sep 29 20:18:34 2006 UTC
# Line 102  sub data_structure { Line 102  sub data_structure {
102          die "need normalisation argument" unless ($arg->{rules});          die "need normalisation argument" unless ($arg->{rules});
103    
104          no strict 'subs';          no strict 'subs';
105          _set_lookup( $arg->{lookup} );          _set_lookup( $arg->{lookup} ) if defined($arg->{lookup});
106          _set_rec( $arg->{row} );          _set_rec( $arg->{row} );
107          _set_config( $arg->{config} );          _set_config( $arg->{config} ) if defined($arg->{config});
108          _clean_ds( %{ $arg } );          _clean_ds( %{ $arg } );
109          $load_ds_coderef = $arg->{load_ds_coderef};          $load_ds_coderef = $arg->{load_ds_coderef};
110    

Legend:
Removed from v.729  
changed lines
  Added in v.730

  ViewVC Help
Powered by ViewVC 1.1.26