-sub prepare{
- my ($name, $format) = @_;
- our $errors;
- my $basename = fileparse $name, qr/\.[^.]*/;
- get_logger->trace("Preparing file $name...");
-
- $errors .= `gruntmaster-compile $format $basename $name 2>&1`;
- $errors .= "\n";
- die 'Compile error' if $?
-}
-
-sub prepare_files{
- my $meta = shift;
-
- for my $file (values $meta->{files}) {
- my ($format, $name, $content) = @{$file}{qw/format name content/};
-
- $file->{run} = mkrun($format);
- write_file $name, $content;
- prepare $name, $format;
- }
-}
-