tracks/perl6/exercises/allergies/allergies.t in trackler-2.0.6.33 vs tracks/perl6/exercises/allergies/allergies.t in trackler-2.0.6.34
- old
+ new
@@ -3,16 +3,11 @@
use Test;
use JSON::Tiny;
use lib ( my $dir = IO::Path.new($?FILE).parent ).path;
-my $module_name = %*ENV<EXERCISM>.so ?? 'Example' !! 'Allergies';
-my @potential_module = <p6 pm6 pm>.map: $module_name ~ '.' ~ *;
-
-my $module = first { $dir.child($_).e }, |@potential_module
- or die "No file '$module_name.p6' found\n";
-
-require $module <&allergic-to &list-allergies>;
+my $module = %*ENV<EXERCISM> ?? 'Example' !! 'Allergies';
+require ::($module) <&allergic-to &list-allergies>;
plan 2;
my %cases = from-json $dir.child('cases.json').slurp;