[Patches] [PATCH] Bug 5327: Added unit test for

[koha-patchbot at kohaaloha.com]

From: Duncan Tyler <duncan at catalyst.net.nz>
Date: Wed, 14 Dec 2011 16:42:30 +1300
Subject: [PATCH] Bug 5327: Added unit test for
 C4/SIP/ILS/Transaction/RenewAll.pm

http://bugs.koha-community.org/show_bug.cgi?id=5327
Signed-off-by: Katrin Fischer <Katrin.Fischer.83 at web.de>
Test requires a database installed using the sample data.
All tests pass.

Signed-off-by: Paul Poulain <paul.poulain at biblibre.com>
---
 t/SIP_ILS.t              |   16 ----------------
 t/db_dependent/SIP_ILS.t |   29 +++++++++++++++++++++++++++++
 2 files changed, 29 insertions(+), 16 deletions(-)
 delete mode 100755 t/SIP_ILS.t
 create mode 100755 t/db_dependent/SIP_ILS.t

diff --git a/t/SIP_ILS.t b/t/SIP_ILS.t
deleted file mode 100755
index 4a3ee70..0000000
--- a/t/SIP_ILS.t
+++ /dev/null
@@ -1,16 +0,0 @@
-#!/usr/bin/perl
-#
-# This Koha test module is a stub!  
-# Add more tests here!!!
-
-use strict;
-use warnings;
-
-use Test::More tests => 1;
-
-BEGIN {
-        use FindBin;
-        use lib "$FindBin::Bin/../C4/SIP";
-        use_ok('C4::SIP::ILS');
-}
-
diff --git a/t/db_dependent/SIP_ILS.t b/t/db_dependent/SIP_ILS.t
new file mode 100755
index 0000000..daf1c29
--- /dev/null
+++ b/t/db_dependent/SIP_ILS.t
@@ -0,0 +1,29 @@
+#!/usr/bin/perl
+#
+# This Koha test module is a stub!
+# Add more tests here!!!
+
+use strict;
+use warnings;
+
+use Test::More tests => 4;
+
+BEGIN {
+        use FindBin;
+        use lib "$FindBin::Bin/../../C4/SIP";
+        use_ok('C4::SIP::ILS');
+};
+
+my $transaction = ILS::Transaction::RenewAll->new();
+
+$transaction->patron(my $patron = ILS::Patron->new(23529000120056));
+
+ok(defined $patron, "patron code: 23529000120056 is valid");
+
+my $transaction2 = ILS::Transaction::RenewAll->new();
+$transaction2->patron(my $patron2 = ILS::Patron->new("ABCDE12345"));
+
+#This test assumes that the patron code ABCDE12345 is invalid
+ok(!defined $patron2, "patron code: ABCDE12345 is invalid");
+
+ok($transaction->do_renew_all(), "items renewed correctly");
-- 
1.7.5.4