File Coverage

blib/lib/Mojolicious/Plugin/RevealJS.pm

Criterion	Covered	Total	%
statement	62	82	75.6
branch	16	22	72.7
condition	10	17	58.8
subroutine	12	13	92.3
pod	1	1	100.0
total	101	135	74.8

package Mojolicious::Plugin::RevealJS;

use Mojo::Base 'Mojolicious::Plugin';

use 5.12.0;

our $VERSION = '0.21';
$VERSION = eval $VERSION;

use Mojo::Home;
use Mojo::ByteStream 'b';
use Mojo::File;

use File::Basename 'dirname';
use File::Share ();

has home => sub { Mojo::Home->new(File::Share::dist_dir('Mojolicious-Plugin-RevealJS')) };

sub register {
  my ($plugin, $app, $conf) = @_;
  my $home = $plugin->home;
  push @{ $app->static->paths },   $home->child('public');
  push @{ $app->renderer->paths }, $home->child('templates');

  $app->defaults('revealjs.init' => {
    controls => \1,
    progress => \1,
    history  => \1,
    center   => \1,
    transition => 'slide', #none/fade/slide/convex/concave/zoom
  });

  $app->helper('revealjs.export' => \&_export);

  $app->helper(include_code => \&_include_code);
  $app->helper(include_sample => \&_include_sample);
  $app->helper(section => sub { shift->tag(section => @_) });
  $app->helper(markdown_section => sub {
    my ($c, @args) = @_;
    return $c->tag(section => data => { markdown => undef } => sub {
      return $c->tag(script => (type => 'text/template') => @args);
    });
  });
}

sub _include_code {
  my ($c, $filename, %opts) = @_;
  my $file = $c->stash->{'revealjs.private.files'}{$filename}
    ||= $c->app->home->rel_file($filename)->slurp;
  my $mark = qr'^\h*(?:#+|-{2,}|/{2,}| or C<<