view release on metacpan or  search on metacpan

t/basic.t  view on Meta::CPAN

use Test::Most tests => 2;
use Dancer::Test;
use Test::Easy qw(resub);

my $class = 'Dancer::Plugin::Swig';

use_ok $class;

sub update_swig {
  my ($key, $val) = @_;

  my $plugins = Dancer::Config::setting('plugins');
  $plugins->{Swig}{$key} = $val;
  set plugins => $plugins;

  Dancer::Plugin::Swig->reinitialize; # pick up change to $plugins
}

subtest "verify that render calls client render method" => sub {