From: Chris W. <la...@us...> - 2004-09-27 20:12:12
|
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/, |