updated release notes for 3.14.0 beta

[koha.git] / t / Barcodes_PrinterConfig.t

diff --git a/t/Barcodes_PrinterConfig.t b/t/Barcodes_PrinterConfig.t
old mode 100644 (file)
new mode 100755 (executable)
index 33ba55c..94102e5
--- a/t/Barcodes_PrinterConfig.t
+++ b/t/Barcodes_PrinterConfig.t
@@ -1,5 +1,22 @@
-BEGIN { $| = 1; print "1..1\n"; }
-END {print "not ok 1\n" unless $loaded;}
-use C4::Barcodes::PrinterConfig;
-$loaded = 1;
-print "ok 1\n";
+#!/usr/bin/perl
+#
+# This Koha test module is a stub!  
+# Add more tests here!!!
+
+use strict;
+use warnings;
+
+use Test::More tests => 6;
+
+BEGIN {
+        use_ok('C4::Barcodes::PrinterConfig');
+}
+
+is(C4::Barcodes::PrinterConfig::setPositionsForY(), "0", "testing setPositionsForY returns'0' when given no arguments");
+is(C4::Barcodes::PrinterConfig::setPositionsForX(), "0", "testing setPositionsForX returns'0' when given no arguments");
+
+is(C4::Barcodes::PrinterConfig::setPositionsForY(undef, undef, 5), "5", "testing setPositionsForY returns'5' when given (undef, undef, 5)");
+is(C4::Barcodes::PrinterConfig::setPositionsForX(undef, undef, 5), "5", "testing setPositionsForX returns'5' when given (undef, undef, 5)");
+
+
+is(C4::Barcodes::PrinterConfig::labelsPage(), "0", "testing labelsPage returns'0' when given no arguments");