diff --git a/t/lib-git-svn.sh b/t/lib-git-svn.sh
index af42ccc8d157e54b97de435194d22e5ed895ab4b..bb1d7b84bcdd3a413e900a0002baf268fa631f3f 100644 (file)
--- a/t/lib-git-svn.sh
+++ b/t/lib-git-svn.sh
use SVN::Core;
use SVN::Repos;
\$SVN::Core::VERSION gt '1.1.0' or exit(42);
use SVN::Core;
use SVN::Repos;
\$SVN::Core::VERSION gt '1.1.0' or exit(42);
-SVN::Repos::create('$svnrepo', undef, undef, undef,
- { 'fs-config' => 'fsfs'});
-"
+system(qw/svnadmin create --fs-type fsfs/, '$svnrepo') == 0 or exit(41);
+" >&3 2>&4
x=$?
if test $x -ne 0
then
if test $x -eq 42; then
err='Perl SVN libraries must be >= 1.1.0'
x=$?
if test $x -ne 0
then
if test $x -eq 42; then
err='Perl SVN libraries must be >= 1.1.0'
+ elif test $x -eq 41; then
+ err='svnadmin failed to create fsfs repository'
else
err='Perl SVN libraries not found or unusable, skipping test'
fi
else
err='Perl SVN libraries not found or unusable, skipping test'
fi