File Coverage

blib/lib/Articulate/Routes/Transparent.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch			n/a
condition			n/a
subroutine	5	5	100.0
pod			n/a
total	20	20	100.0

package Articulate::Routes::Transparent;
use strict;
use warnings;

use Moo;
with 'Articulate::Role::Routes';
use Articulate::Syntax::Routes;
use Articulate::Service;

get '/zone/:zone_id/article/:article_id' => sub {
  my ($self, $request) = @_;
  my $zone_id    = $request->params->{'zone_id'};
  my $article_id = $request->params->{'article_id'};
  $self->service->process_request(
    read => {
      location => "zone/$zone_id/article/$article_id",
    }
  );
};

post '/zone/:zone_id/article/:article_id' => sub {
  my ($self, $request) = @_;
  my $zone_id    = $request->params->{'zone_id'};
  my $article_id = $request->params->{'article_id'};
  my $content    = $request->params->{'content'};
  $self->service->process_request(
    create => {
      location =>"zone/$zone_id/article/$article_id",
      content  => $content,
    }
  );
};

post '/zone/:zone_id/article/:article_id/edit' => sub {
  my ($self, $request) = @_;
  my $zone_id    = $request->params->{'zone_id'};
  my $article_id = $request->params->{'article_id'};
  my $content    = $request->params->{'content'};
  $self->service->process_request(
    update => {
      location =>"zone/$zone_id/article/$article_id",
      content  => $content,
    }
  );
};

1;