PLS

 view release on metacpan or  search on metacpan

lib/PLS/Server/Method/CompletionItem.pm  view on Meta::CPAN

L<PLS::Server::Request::CompletionItem::Resolve>

=back

=cut

sub get_request
{
    my ($request) = @_;

    my (undef, $method) = split m{/}, $request->{method};

    if ($method eq 'resolve')
    {
        return PLS::Server::Request::CompletionItem::Resolve->new($request);
    }

    return;
} ## end sub get_request

1;

lib/PLS/Server/Method/TextDocument.pm  view on Meta::CPAN

L<PLS::Server::Request::TextDocument::Completion>

=back

=cut

sub get_request
{
    my ($request) = @_;

    my (undef, $method) = split m{/}, $request->{method};

    if ($method eq 'definition')
    {
        return PLS::Server::Request::TextDocument::Definition->new($request);
    }
    if ($method eq 'documentSymbol')
    {
        return PLS::Server::Request::TextDocument::DocumentSymbol->new($request);
    }
    if ($method eq 'hover')

lib/PLS/Server/Method/Workspace.pm  view on Meta::CPAN

L<PLS::Server::Request::Workspace::ExecuteCommand>

=back

=cut

sub get_request
{
    my ($request) = @_;

    my (undef, $method) = split m{/}, $request->{method};

    if ($method eq 'didChangeConfiguration')
    {
        return PLS::Server::Request::Workspace::DidChangeConfiguration->new($request);
    }
    if ($method eq 'didChangeWatchedFiles')
    {
        return PLS::Server::Request::Workspace::DidChangeWatchedFiles->new($request);
    }
    if ($method eq 'didChangeWorkspaceFolders')

lib/PLS/Server/Request/Factory.pm  view on Meta::CPAN

will determine the appropriate subclass of L<PLS::Server::Request> for the request
and return it.

=cut

sub new
{
    my ($class, $request) = @_;

    my $method = $request->{method};
    ($method) = split m{/}, $method;

    # create and return request classes here

    if (   PLS::Server::Method::ServerMethod::is_server_method($method)
        or not $PLS::Server::State::INITIALIZED
        or $PLS::Server::State::SHUTDOWN)
    {
        return PLS::Server::Method::ServerMethod::get_request($request);
    } ## end if (PLS::Server::Method::ServerMethod::is_server_method...)
    elsif ($method eq 'textDocument')