File Coverage

blib/lib/Mojolicious/Plugin/LinkEmbedder/Link/Text.pm

Criterion	Covered	Total	%
statement	6	15	40.0
branch	0	2	0.0
condition			n/a
subroutine	2	4	50.0
pod	2	2	100.0
total	10	23	43.4

package Mojolicious::Plugin::LinkEmbedder::Link::Text;
use Mojo::Base 'Mojolicious::Plugin::LinkEmbedder::Link';
use Mojo::Util ();

sub raw_url { shift->url->clone }

sub to_embed {
  return $_[0]->SUPER::to_embed unless $_[0]->{text};

  my $self     = shift;
  my $media_id = $self->media_id;
  my $text     = $self->{text};

  return <<"  HTML";


    Hosted by
    @{[$self->provider_name]}
    -
    View raw

  $text

  HTML
}

1;

=encoding utf8

=head1 NAME

Mojolicious::Plugin::LinkEmbedder::Link::Text - Text URL

=head1 DESCRIPTION

This class inherit from L.

=head2 Example styling

  .link-embedder .text-paste{background: #eee;border: 1px solid #ccc;}
  .link-embedder .text-paste .paste-meta{border-bottom: 1px solid #ccc;padding: 4px;}
  .link-embedder .text-paste pre{padding: 4px;margin:0;max-height: 240px;overflow:auto;}

=head1 METHODS

=head2 raw_url

=head2 to_embed

Returns the HTML code for a script tag that writes the gist.

=head1 AUTHOR

Jan Henning Thorsen - C

=cut