File Coverage

blib/lib/Mojolicious/Plugin/LinkEmbedder/Link/Video/AppearIn.pm

Criterion	Covered	Total	%
statement	3	11	27.2
branch	0	4	0.0
condition	0	4	0.0
subroutine	1	4	25.0
pod	0	3	0.0
total	4	26	15.3

package Mojolicious::Plugin::LinkEmbedder::Link::Video::AppearIn;
use Mojo::Base 'Mojolicious::Plugin::LinkEmbedder::Link';

has media_id => sub {
  my $self = shift;

  return '' if defined $self->url->path->[1];
  return $self->url->path->[0] || '';
};

sub provider_name {'appear.in'}

sub learn {
  my ($self, $c, $cb) = @_;

  return $self->$cb if $self->media_id;
  return $self->SUPER::learn($c, $cb);
}

sub to_embed {
  my $self     = shift;
  my $media_id = $self->media_id or return $self->SUPER::to_embed;
  my %args     = @_;

  $self->_iframe(
    src    => "https://appear.in/$media_id",
    class  => 'link-embedder video-appearin',
    width  => $args{width} || 740,
    height => $args{height} || 390
  );
}

1;