File Coverage

blib/lib/PLS/Server/Request/TextDocument/Formatting.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 19 20 95.0


line stmt bran cond sub pod time code
1             package PLS::Server::Request::TextDocument::Formatting;
2              
3 9     9   54 use strict;
  9         18  
  9         244  
4 9     9   45 use warnings;
  9         18  
  9         215  
5              
6 9     9   37 use parent 'PLS::Server::Request';
  9         10  
  9         46  
7              
8 9     9   3834 use PLS::Server::Response::Formatting;
  9         172  
  9         2025  
9              
10             =head1 NAME
11              
12             PLS::Server::Request::TextDocument::Formatting
13              
14             =head1 DESCRIPTION
15              
16             This is a message from the client to the server requesting that
17             the server format the current document.
18              
19             =cut
20              
21             sub service
22             {
23 1     1 0 15 my ($self) = @_;
24              
25 1         30 return PLS::Server::Response::Formatting->new($self);
26             }
27              
28             1;