[Koha-cvs] koha/t koha.t

Chris Cormack crc at liblime.com
Mon Jun 18 05:26:54 CEST 2007


CVSROOT:	/sources/koha
Module name:	koha
Changes by:	Chris Cormack <rangi>	07/06/18 03:26:54

Modified files:
	t              : koha.t 

Log message:
	Removing tes for deprecated function, of course there are a ton more
	functions in here that need tests written for them

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/t/koha.t?cvsroot=koha&r1=1.3&r2=1.4

Patches:
Index: koha.t
===================================================================
RCS file: /sources/koha/koha/t/koha.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- koha.t	20 Jun 2002 18:18:13 -0000	1.3
+++ koha.t	18 Jun 2007 03:26:54 -0000	1.4
@@ -1,4 +1,4 @@
-BEGIN { $| = 1; print "1..6\n"; }
+BEGIN { $| = 1; print "1..2\n"; }
 END {print "not ok 1\n" unless $loaded;}
 use C4::Koha;
 $loaded = 1;
@@ -16,26 +16,4 @@
     print "not ok 2\n";
 }
 
-#
-# Check that &fixEthnicity returns correct values
-#
-if ('Maori' eq fixEthnicity('maori')) {
-    print "ok 3\n";
-} else {
-    print "not ok 3\n";
-}
-if ('European/Pakeha' eq fixEthnicity('european')) {
-    print "ok 4\n";
-} else {
-    print "not ok 4\n";
-}
-if ('Pacific Islander' eq fixEthnicity('pi')) {
-    print "ok 5\n";
-} else {
-    print "not ok 5\n";
-}
-if ('Asian' eq fixEthnicity('asian')) {
-    print "ok 6\n";
-} else {
-    print "not ok 6\n";
-}
+





More information about the Koha-cvs mailing list