7 my($runtests,$dir,$tdir);
13 $::module = 'Locale::Codes::LangFam';
15 $runtests=shift(@ARGV);
16 if ( -f "t/testfunc.pl" ) {
17 require "t/testfunc.pl";
19 require "t/vals_langfam.pl";
22 } elsif ( -f "testfunc.pl" ) {
23 require "testfunc.pl";
25 require "vals_langfam.pl";
29 die "ERROR: cannot find testfunc.pl\n";
35 test_Func(\&test,$::tests,$runtests);
40 # indent-tabs-mode: nil
41 # cperl-indent-level: 3
42 # cperl-continued-statement-offset: 2
43 # cperl-continued-brace-offset: 0
44 # cperl-brace-offset: 0
45 # cperl-brace-imaginary-offset: 0
46 # cperl-label-offset: 0