Bug 31162: (follow-up) Fix Mocks/Zebra.pm

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

diff --git a/C4/Patroncards.pm b/C4/Patroncards.pm
index e833193..7358b29 100644 (file)
--- a/C4/Patroncards.pm
+++ b/C4/Patroncards.pm
@@ -1,7 +1,8 @@
 package C4::Patroncards;
 
+use Modern::Perl;
+
 BEGIN {
-    use version; our $VERSION = qv('1.0.0_1');
     use vars qw(@EXPORT @ISA);
     @ISA = qw(Exporter);
     our @EXPORT = qw(unpack_UTF8
@@ -13,12 +14,21 @@ BEGIN {
                      get_image
                      rm_image
     );
-    use C4::Patroncards::Batch 1.000000;
-    use C4::Patroncards::Layout 1.000000;
-    use C4::Patroncards::Lib 1.000000;
-    use C4::Patroncards::Patroncard 1.000000;
-    use C4::Patroncards::Profile 1.000000;
-    use C4::Patroncards::Template 1.000000;
+    use C4::Patroncards::Batch;
+    use C4::Patroncards::Layout;
+    use C4::Patroncards::Lib qw(
+    box
+    get_borrower_attributes
+    get_image
+    leading
+    put_image
+    rm_image
+    text_alignment
+    unpack_UTF8
+);
+    use C4::Patroncards::Patroncard;
+    use C4::Patroncards::Profile;
+    use C4::Patroncards::Template;
 }
 
 1;