File Coverage

blib/lib/PLS/Server/Request/Workspace/DidChangeConfiguration.pm
Criterion Covered Total %
statement 12 14 85.7
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 20 80.0


line stmt bran cond sub pod time code
1              
2             use strict;
3 9     9   61 use warnings;
  9         26  
  9         237  
4 9     9   38  
  9         18  
  9         201  
5             use parent 'PLS::Server::Request';
6 9     9   45  
  9         18  
  9         36  
7             use PLS::Server::Request::Workspace::Configuration;
8 9     9   601  
  9         72  
  9         647  
9             =head1 NAME
10              
11             PLS::Server::Request::Workspace::DidChangeConfiguration
12              
13             =head1 DESCRIPTION
14              
15             This is a notification from the client to the server indicating that there
16             was a configuration change.
17              
18             The server sends back a L<PLS::Server::Request::Workspace::Configuration> request
19             to ask for the new configuration.
20              
21             =cut
22              
23             {
24             my ($self, $server) = @_;
25              
26 0     0 0   $server->send_server_request(PLS::Server::Request::Workspace::Configuration->new());
27             }
28 0            
29             1;