Previously could not add or update subfields in MARC Authority
Subfield Structure if no Librarian Text supplied
Requirement removed
---
 admin/auth_subfields_structure.pl |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)

diff --git a/admin/auth_subfields_structure.pl 
b/admin/auth_subfields_structure.pl
index fd86778..84ccd11 100755
--- a/admin/auth_subfields_structure.pl
+++ b/admin/auth_subfields_structure.pl
@@ -400,6 +400,7 @@ if ($op eq 'add_form') {
                my $tagsubfield         =$tagsubfield[$i];
                $tagsubfield="@" unless $tagsubfield ne '';
                my $liblibrarian                =$liblibrarian[$i];
+        $liblibrarian ||= q{}; # ensure its defined
                my $libopac                     =$libopac[$i];
                my $repeatable          =$input->param("repeatable$i")?1:0;
                my $mandatory           =$input->param("mandatory$i")?1:0;
@@ -411,7 +412,6 @@ if ($op eq 'add_form') {
                my $value_builder=$value_builder[$i];
                my $hidden = $ohidden[$i].$ihidden[$i].$ehidden[$i]; #collate 
from 3 hiddens;
                my $isurl = $input->param("isurl$i")?1:0;
-               if ($liblibrarian) {
                        unless (C4::Context->config('demo') eq 1) {
                                if 
(auth_subfield_structure_exists($authtypecode, $tagfield, $tagsubfield)) {
                                        $sth_update->execute(
@@ -456,7 +456,6 @@ if ($op eq 'add_form') {
                                        );
                                }
                        }
-               }
        }
        print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; 
URL=auth_subfields_structure.pl?tagfield=$tagfield&authtypecode=$authtypecode\"></html>";
        exit;
-- 
1.6.2.5

_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches

Reply via email to