From 02a942767f0f03eb3ba8101399bad34bc9b09390 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 22 Jun 2018 12:21:01 -0300 Subject: [PATCH] Bug 15836: Mark C4::ClassSource subs DEPRECATED MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit These subs are no longer used from scripts and should be removed. It should be done on a separate bug report given that additional work is needed Sponsored-by: Goethe-Institut Signed-off-by: Christian Stelzenmüller Signed-off-by: Chris Cormack Signed-off-by: Nick Clemens --- C4/ClassSource.pm | 20 +++++++++++++------- admin/classsources.pl | 1 - 2 files changed, 13 insertions(+), 8 deletions(-) diff --git a/C4/ClassSource.pm b/C4/ClassSource.pm index 245f9589c6..fc4cfbb658 100644 --- a/C4/ClassSource.pm +++ b/C4/ClassSource.pm @@ -48,16 +48,10 @@ sources and sorting rules. @ISA = qw(Exporter); @EXPORT = qw( &GetClassSources - &AddClassSource &GetClassSource - &ModClassSource - &DelClassSource &GetClassSortRules - &AddClassSortRule &GetClassSortRule - &ModClassSortRule - &DelClassSortRule - + &GetSourcesForSortRule &GetClassSort @@ -103,6 +97,8 @@ sub GetClassSources { =head2 AddClassSource + DEPRECATED + AddClassSource($cn_source, $description, $used, $class_sort_rule); Adds a class_sources row. @@ -144,6 +140,8 @@ sub GetClassSource { =head2 ModClassSource + DEPRECATED + ModClassSource($cn_source, $description, $used, $class_sort_rule); Updates a class_sources row. @@ -165,6 +163,8 @@ sub ModClassSource { =head2 DelClassSource + DEPRECATED + DelClassSource($cn_source); Deletes class_sources row. @@ -219,6 +219,8 @@ sub GetClassSortRules { =head2 AddClassSortRule + DEPRECATED + AddClassSortRule($class_sort_rule, $description, $sort_routine); Adds a class_sort_rules row. @@ -260,6 +262,8 @@ sub GetClassSortRule { =head2 ModClassSortRule + DEPRECATED + ModClassSortRule($class_sort_rule, $description, $sort_routine); Updates a class_sort_rules row. @@ -280,6 +284,8 @@ sub ModClassSortRule { =head2 DelClassSortRule + DEPRECATED + DelClassSortRule($class_sort_rule); Deletes class_sort_rules row. diff --git a/admin/classsources.pl b/admin/classsources.pl index 14d86dac55..697db41e45 100755 --- a/admin/classsources.pl +++ b/admin/classsources.pl @@ -25,7 +25,6 @@ use C4::Auth; use C4::Context; use C4::Output; use C4::Koha; -use C4::ClassSource; use C4::ClassSortRoutine; use C4::ClassSplitRoutine; use Koha::ClassSources; -- 2.39.5