1 package C4::AuthoritiesMarc::UNIMARC;
3 # Copyright (C) 2007 LibLime
5 # This file is part of Koha.
7 # Koha is free software; you can redistribute it and/or modify it under the
8 # terms of the GNU General Public License as published by the Free Software
9 # Foundation; either version 2 of the License, or (at your option) any later
12 # Koha is distributed in the hope that it will be useful, but WITHOUT ANY
13 # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
14 # A PARTICULAR PURPOSE. See the GNU General Public License for more details.
16 # You should have received a copy of the GNU General Public License along
17 # with Koha; if not, write to the Free Software Foundation, Inc.,
18 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21 #use warnings; FIXME - Bug 2505
26 C4::AuthoritiesMarc::UNIMARC
30 use C4::AuthoritiesMarc::UNIMARC;
34 This is a helper module providing functions used by
35 C<C4::AuthoritiesMarc> to deal with behavior specific
36 to UNIMARC authority records (as opposed to other
39 Functions from this module generally should not be used
40 directly; instead, use the appropriate function from
41 C<C4::Authorities> that will dispatch the appropriate
42 function based on the marcflavour system preference.
48 =head2 get_heading_type_from_marc
52 my $auth_type = get_auth_type_from_marc($marc);
56 Given a MARC::Record object containing an authority record,
57 determine its heading type (e.g., personal name, topical term,
62 =head2 default_auth_type_location
66 my ($tag, $subfield) = default_auth_type_location();
70 Get the tag and subfield used to store the heading type
71 if not specified in the MARC framework. For UNIMARC,
72 this defaults to 152$b.
76 sub default_auth_type_location {
82 Koha Developement team <info@koha.org>
84 Galen Charlton <galen.charlton@liblime.com>