Update of /cvsroot/popfile/engine
In directory sc8-pr-cvs1:/tmp/cvs-serv6550
Modified Files:
tests.pl
Log Message:
Added test suite for the classify_and_modify subroutine so that we can check that subject modification, XTC and XPL insertion are working correctly
Index: tests.pl
===================================================================
RCS file: /cvsroot/popfile/engine/tests.pl,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** tests.pl 11 Feb 2003 21:31:53 -0000 1.11
--- tests.pl 20 Feb 2003 21:30:31 -0000 1.12
***************
*** 8,11 ****
--- 8,13 ----
# ---------------------------------------------------------------------------------------------
+ use strict;
+
# Look for all the TST files in the tests/ subfolder and run
# each of them by including them in this file with the use statement
***************
*** 87,91 ****
my $result;
! if ( $expected =~ /[^0-9]/ ) {
# This int() and is so that we don't get bitten by odd
--- 89,93 ----
my $result;
! if ( !( $expected =~ /[^0-9]/ ) ) {
# This int() and is so that we don't get bitten by odd
|
