@@ -, +, @@
---
authorities/authorities.pl | 27 +++++++++++--------
.../en/modules/cataloguing/z3950_auth_search.tt | 8 +++---
2 files changed, 20 insertions(+), 15 deletions(-)
--- a/authorities/authorities.pl
+++ a/authorities/authorities.pl
@@ -330,18 +330,23 @@ sub CreateKey {
=cut
-sub GetMandatoryFieldZ3950($){
+sub GetMandatoryFieldZ3950 {
my $authtypecode = shift;
-
- #Tags guessed (see GuessAuthTypeCode from AuthoritiesMarc.pm)
-
- return {
- '100'.'a' => 'authorpersonal',
- '110'.'a' => 'authorcorp',
- '111'.'a' => 'authormeetingcon',
- '130'.'a' => 'uniformtitle',
- '150'.'a' => 'topic',
- };
+ if ( C4::Context->preference('marcflavour') eq 'MARC21' ){
+ return {
+ '100a' => 'authorpersonal',
+ '110a' => 'authorcorp',
+ '111a' => 'authormeetingcon',
+ '130a' => 'uniformtitle',
+ '150a' => 'topic',
+ };
+ }else{
+ return {
+ '200a' => 'authorpersonal',
+ '210a' => 'authormeetingcon', #210 in UNIMARC is used for both corporation and meeting
+ '230a' => 'uniformtitle',
+ };
+ }
}
sub build_tabs {
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/z3950_auth_search.tt
+++ a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/z3950_auth_search.tt
@@ -191,16 +191,16 @@ tr.selected { background-color : #FFFFCC; } tr.selected td { background-color :
[% END %]
[% IF ( show_prevbutton ) %]
-
+
[% END %]
Page [% current_page %] / [% total_pages %]
[% IF ( show_nextbutton ) %]
-
+
[% END %]
Go to page :
-