This commit is contained in:
Markus Goetz 2015-05-12 16:26:04 +02:00
Родитель c2dacd03a5
Коммит 6b16e18eb8
1 изменённых файлов: 2 добавлений и 1 удалений

Просмотреть файл

@ -124,7 +124,8 @@ sub initTesting(;$)
$ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0 $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0
} }
$d = HTTP::DAV->new(); my $ua = HTTP::DAV::UserAgent->new(keep_alive => 1 );
$d = HTTP::DAV->new(-useragent => $ua);
$d->credentials( -url=> $owncloud, -realm=>"ownCloud", $d->credentials( -url=> $owncloud, -realm=>"ownCloud",
-user=> $user, -user=> $user,