use Dancer ':tests', ':syntax';
use Dancer::Plugin::WebDAV;
use Dancer::Test;
use Test::More;

my @methods = qw(
    propfind
    proppatch
    mkcol
    copy
    move
    lock
    unlock
);

propfind    "/" => sub { "propfind" };
proppatch   "/" => sub { "proppatch" };
mkcol       "/" => sub { "mkcol" };
copy        "/" => sub { "copy" };
move        "/" => sub { "move" };
lock        "/" => sub { "lock" };
unlock      "/" => sub { "unlock" };

for my $m (@methods) {
    route_exists          [ $m => "/" ], "route handler found for method $m";
    response_status_is    [ $m => "/" ], 200, "response status is 200 for $m";
    response_content_like [ $m => "/" ], qr{$m}, "response content is OK for $m";
}

done_testing;