Update of /cvsroot/openinteract/OpenInteract2/t
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31411/t
Modified Files:
package.t
Log Message:
modify regex to work under win32
Index: package.t
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/t/package.t,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
*** package.t 9 Jun 2004 01:10:52 -0000 1.15
--- package.t 27 Sep 2004 20:12:02 -0000 1.16
***************
*** 115,118 ****
--- 115,119 ----
my $expand_dir = catdir( get_current_dir(), 'fruit-1.00' );
mkdir( $expand_dir, 0777 );
+ $expand_dir =~ s|\\|\\\\|g;
eval { $d_package->export };
like( "$@", qr/^Directory '$expand_dir' already exists/,
|