Bug 30077: (follow-up) retain branch selection

[koha-ffzg.git] / C4 / ClassSplitRoutine.pm

diff --git a/C4/ClassSplitRoutine.pm b/C4/ClassSplitRoutine.pm
index ed6f665..2da560d 100644 (file)
--- a/C4/ClassSplitRoutine.pm
+++ b/C4/ClassSplitRoutine.pm
@@ -1,6 +1,6 @@
 package C4::ClassSplitRoutine;
 
-# Copyright 2018 Koha Development Team
+# Copyright 2022 Koha Development Team
 #
 # This file is part of Koha.
 #
@@ -19,10 +19,16 @@ package C4::ClassSplitRoutine;
 
 use Modern::Perl;
 
-require Exporter;
-
-use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
+use Class::Factory::Util;
 
+our (@ISA, @EXPORT_OK);
+BEGIN {
+    require Exporter;
+    @ISA    = qw(Exporter);
+    @EXPORT_OK = qw(
+       GetSplitRoutineNames
+    );
+}
 
 =head1 NAME
 
@@ -36,11 +42,6 @@ use C4::ClassSplitRoutine;
 
 =cut
 
-@ISA    = qw(Exporter);
-@EXPORT = qw(
-   GetSplitRoutineNames
-);
-
 =head2 GetSplitRoutineNames
 
   my @routines = GetSplitRoutineNames();