Parent Directory | Revision Log | Patch
revision 550 by dpavlin, Fri Jun 30 18:48:33 2006 UTC | revision 551 by dpavlin, Fri Jun 30 20:43:09 2006 UTC | |
---|---|---|
# | Line 168 You can change behaviour of that using C | Line 168 You can change behaviour of that using C |
168 | ||
169 | sub _get_marc_fields { | sub _get_marc_fields { |
170 | ||
171 | return if (! $marc_record || ref($marc_record) ne 'ARRAY' || $#{ $marc_record } < 0); | |
172 | ||
173 | # first, sort all existing fields | # first, sort all existing fields |
174 | # XXX might not be needed, but modern perl might randomize elements in hash | # XXX might not be needed, but modern perl might randomize elements in hash |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |