View | Details | Raw Unified | Return to bug 37152
Collapse All | Expand All

(-)a/admin/auth_tag_structure.pl (-1 / +1 lines)
Lines 142-148 if ($op eq 'add_form') { Link Here
142
                                                    # END $OP eq ADD_VALIDATE
142
                                                    # END $OP eq ADD_VALIDATE
143
################## DELETE_CONFIRM ##################################
143
################## DELETE_CONFIRM ##################################
144
# called by default form, used to confirm deletion of data in DB
144
# called by default form, used to confirm deletion of data in DB
145
} elsif ($op eq 'cud-delete_confirm') {
145
} elsif ($op eq 'delete_confirm') {
146
    $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from auth_tag_structure where tagfield=?");
146
    $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from auth_tag_structure where tagfield=?");
147
    $sth->execute($searchfield);
147
    $sth->execute($searchfield);
148
    my $data=$sth->fetchrow_hashref;
148
    my $data=$sth->fetchrow_hashref;
(-)a/admin/marctagstructure.pl (-2 / +1 lines)
Lines 160-166 if ($op eq 'add_form') { Link Here
160
													# END $OP eq ADD_VALIDATE
160
													# END $OP eq ADD_VALIDATE
161
################## DELETE_CONFIRM ##################################
161
################## DELETE_CONFIRM ##################################
162
# called by default form, used to confirm deletion of data in DB
162
# called by default form, used to confirm deletion of data in DB
163
} elsif ($op eq 'cud-delete_confirm') {
163
} elsif ($op eq 'delete_confirm') {
164
    $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value,ind1_defaultvalue,ind2_defaultvalue from marc_tag_structure where tagfield=? and frameworkcode=?");
164
    $sth=$dbh->prepare("select tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value,ind1_defaultvalue,ind2_defaultvalue from marc_tag_structure where tagfield=? and frameworkcode=?");
165
    $sth->execute($searchfield, $frameworkcode);
165
    $sth->execute($searchfield, $frameworkcode);
166
    my $data = $sth->fetchrow_hashref;
166
    my $data = $sth->fetchrow_hashref;
167
- 

Return to bug 37152