Bug 20144: [sql_modes] Set subscription.numberlength and weeklength to NULL if not...

[koha.git] / C4 / Koha.pm

diff --git a/C4/Koha.pm b/C4/Koha.pm
index f547fe0..42c8af1 100644 (file)
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -1002,32 +1002,6 @@ sub GetVariationsOfISSNs {
     return wantarray ? @issns : join( " | ", @issns );
 }
 
-
-=head2 IsKohaFieldLinked
-
-    my $is_linked = IsKohaFieldLinked({
-        kohafield => $kohafield,
-        frameworkcode => $frameworkcode,
-    });
-
-    Return 1 if the field is linked
-
-=cut
-
-sub IsKohaFieldLinked {
-    my ( $params ) = @_;
-    my $kohafield = $params->{kohafield};
-    my $frameworkcode = $params->{frameworkcode} || '';
-    my $dbh = C4::Context->dbh;
-    my $is_linked = $dbh->selectcol_arrayref( q|
-        SELECT COUNT(*)
-        FROM marc_subfield_structure
-        WHERE frameworkcode = ?
-        AND kohafield = ?
-    |,{}, $frameworkcode, $kohafield );
-    return $is_linked->[0];
-}
-
 1;
 
 __END__