File Coverage

blib/lib/Mojolicious/Plugin/LinkEmbedder/Link/Music/Spotify.pm

Criterion	Covered	Total	%
statement	3	18	16.6
branch	0	2	0.0
condition	0	8	0.0
subroutine	1	4	25.0
pod	3	3	100.0
total	7	35	20.0

package Mojolicious::Plugin::LinkEmbedder::Link::Music::Spotify;

=head1 NAME

Mojolicious::Plugin::LinkEmbedder::Link::Music::Spotify - Spotify link

=head1 DESCRIPTION

L

This class inherit from L.

=cut

use Mojo::Base 'Mojolicious::Plugin::LinkEmbedder::Link::Music';

=head1 ATTRIBUTES

=head2 media_id

Returns a normalized spotify link.

=head2 provider_name

Returns "Spotify".

=cut

has media_id => sub {
  my $self = shift;
  my $path = $self->url->path;

  return join ':', spotify => "$path" if $self->url->scheme eq 'spotify';
  return join ':', spotify => @$path  if @$path == 2;
  return '';
};

sub provider_name {'Spotify'}

=head1 METHODS

=head2 pretty_url

Returns a L link with L.

=cut

sub pretty_url {
  my $self     = shift;
  my $url      = Mojo::URL->new('https://open.spotify.com');
  my $media_id = $self->media_id;

  $media_id =~ s!^spotify!!;
  $url->path(join '/', split ':', $media_id);
  $url;
}

=head2 to_embed

Returns the HTML code for an iframe embedding this movie.

=cut

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

  $args{width}  ||= 300;
  $args{height} ||= 80;
  $args{view}   ||= 'coverart';
  $args{theme}  ||= 'white';

  $self->_iframe(
    src    => "https://embed.spotify.com/?uri=$media_id&theme=$args{theme}&view=$args{view}",
    class  => 'link-embedder music-spotify',
    width  => $args{width},
    height => $args{height}
  );
}

=head1 AUTHOR

Marcus Ramberg

=cut

1;