@@ -, +, @@ --- t/ClassSortRoutine_LCC.t | 15 ++++++++++++++- 1 files changed, 14 insertions(+), 1 deletions(-) --- a/t/ClassSortRoutine_LCC.t +++ a/t/ClassSortRoutine_LCC.t @@ -6,9 +6,22 @@ use strict; use warnings; -use Test::More tests => 1; +use Test::More tests => 9; BEGIN { use_ok('C4::ClassSortRoutine::LCC'); } +#Obvious cases +is(C4::ClassSortRoutine::LCC::get_class_sort_key(), "", "No arguements returns an empty string"); +is(C4::ClassSortRoutine::LCC::get_class_sort_key('a','b'), "A_B", "Arguements 'a','b' return 'A_B'"); + +#spaces in arguements +is(C4::ClassSortRoutine::LCC::get_class_sort_key(' ','b'), "B_", "Arguements ' ','b' return 'B_'"); +is(C4::ClassSortRoutine::LCC::get_class_sort_key('a',' '), "A_", "Arguements 'a',' ' return 'A_'"); +is(C4::ClassSortRoutine::LCC::get_class_sort_key(' ',' '), "", "Arguements ' ',' ' return ''"); + +#'funky cases' based on regex in code +is(C4::ClassSortRoutine::LCC::get_class_sort_key('.','b'), "_B", "Arguements '.','b' return '_B'"); +is(C4::ClassSortRoutine::LCC::get_class_sort_key('....','........'), "_______", "Arguements '....','........' return '_______'"); +is(C4::ClassSortRoutine::LCC::get_class_sort_key('.','.'), "__", "Arguements '.','.' return '__'"); --