Index: t/11_svn.t =================================================================== --- t/11_svn.t (revision 19529) +++ t/11_svn.t (working copy) @@ -7,7 +7,7 @@ use Test::More; BEGIN { - if ( -d '.svn' ) { + if ( -d '.svn/props' || -d '.svn/prop-base') { plan tests => 4; } else { plan skip_all => 'Not in an SVN checkout'; Index: t/12_mime.t =================================================================== --- t/12_mime.t (revision 19529) +++ t/12_mime.t (working copy) @@ -60,7 +60,7 @@ # Detect the mime type using svn metadata SKIP: { - skip( "Not an SVN checkout", 3 ) unless -e '.svn'; + skip( "Not an SVN checkout", 3 ) unless -d '.svn/props' || -d '.svn/prop-base'; my $file = catfile( 't', 'perl', 'zerolengthperl' ); ok( -f $file, "Found zero length perl file $file" );