tracks/perl5/templates/test.mustache in trackler-2.2.1.105 vs tracks/perl5/templates/test.mustache in trackler-2.2.1.106

- old
+ new

@@ -1,20 +1,18 @@ #!/usr/bin/env perl use strict; use warnings; -use FindBin;{{#cdata}} -my $dir;{{/cdata}} -use lib{{#cdata}} $dir ={{/cdata}} $FindBin::Bin;{{#lib_comment}} {{&lib_comment}}{{/lib_comment}}{{#cdata}} +use FindBin; +use lib $FindBin::Bin;{{#lib_comment}} {{&lib_comment}}{{/lib_comment}}{{#cdata}} use JSON::PP;{{/cdata}}{{#modules}} use {{&use}};{{/modules}} my $exercise{{#exercise}} = '{{&exercise}}'{{/exercise}};{{#exercise_comment}} {{&exercise_comment}}{{/exercise_comment}} my $test_version{{#version}} = {{&version}}{{/version}};{{#version_comment}} {{&version_comment}}{{/version_comment}} -my $module = $ENV{EXERCISM} ? 'Example' : $exercise;{{#module_comment}} {{&module_comment}}{{/module_comment}} use Test::More{{#plan}} tests => {{&plan}}{{/plan}};{{#plan_comment}} {{&plan_comment}}{{/plan_comment}} -use_ok $module or BAIL_OUT;{{#use_test_comment}} {{&use_test_comment}}{{/use_test_comment}} +use_ok $exercise or BAIL_OUT;{{#use_test_comment}} {{&use_test_comment}}{{/use_test_comment}} {{#version_test_comment}} {{&version_test_comment}}{{/version_test_comment}} my $exercise_version = $exercise->VERSION // 0; if ($exercise_version != $test_version) { warn "\nExercise version mismatch. Further tests may fail!" @@ -30,21 +28,10 @@ $subs{$_} = $exercise->can($_); } {{/subs}}{{#cdata}} my $C_DATA = do { local $/; decode_json(<DATA>); };{{/cdata}} {{&tests}} -{{#cdata}}{{#cdata_test_comment}} -{{&cdata_test_comment}}{{/cdata_test_comment}} -SKIP: { - skip '', 1 unless $ENV{EXERCISM}; - TODO: { - local $TODO = 'update canonical-data'; - is_deeply eval q{ - use Path::Tiny; - decode_json path("$dir/../../problem-specifications/exercises/".path($dir)->basename.'/canonical-data.json')->realpath->slurp; - }, $C_DATA, 'canonical-data'; - } -} +{{#cdata}} __DATA__ {{&json}} {{/cdata}}