Bug 5327 added unit tests for C4/ClassSortRoutine/Generic
authorConnor Dewar <connor.dewar@gmail.com>
Tue, 17 Jan 2012 00:55:03 +0000 (13:55 +1300)
committerPaul Poulain <paul.poulain@biblibre.com>
Tue, 17 Jan 2012 14:31:55 +0000 (15:31 +0100)
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
t/ClassSortRoutine_Generic.t

index d627259..128006b 100755 (executable)
@@ -6,9 +6,19 @@
 use strict;
 use warnings;
 
-use Test::More tests => 1;
+use Test::More tests => 3;
 
 BEGIN {
         use_ok('C4::ClassSortRoutine::Generic');
 }
 
+my $cn_class = "My class ";
+my $cn_item = " hellO";
+
+my $cn_sort = C4::ClassSortRoutine::Generic::get_class_sort_key($cn_class, $cn_item);
+
+is($cn_sort,"MY_CLASS_HELLO","testing cnsort");
+
+$cn_sort = C4::ClassSortRoutine::Generic::get_class_sort_key(undef, undef);
+
+is($cn_sort,"","Testing blank cnsort");