Parent Directory | Revision Log | Patch
revision 707 by dpavlin, Mon Sep 25 15:26:12 2006 UTC | revision 711 by dpavlin, Tue Sep 26 10:05:25 2006 UTC | |
---|---|---|
# | Line 977 sub save_into_lookup { | Line 977 sub save_into_lookup { |
977 | my $mfn = $rec->{'000'}->[0] || die "mfn not defined or zero"; | my $mfn = $rec->{'000'}->[0] || die "mfn not defined or zero"; |
978 | foreach my $v ( $coderef->() ) { | foreach my $v ( $coderef->() ) { |
979 | $lookup->{$k}->{$v}->{$mfn}++; | $lookup->{$k}->{$v}->{$mfn}++; |
980 | warn "# lookup $k $v $mfn saved\n"; # if ($debug > 1); | warn "# lookup $k $v $mfn saved\n" if ($debug > 1); |
981 | } | } |
982 | } | } |
983 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |