Use a static list of formats in gruntmaster-problem

diff --git a/gruntmaster-problem b/gruntmaster-problem
index 76e921f7fc788ab65d17dac7a89b01f00a15ec75..3ab12196135a778d6ce1734de7c2e0645933a02c 100755 (executable)
--- a/gruntmaster-problem
+++ b/gruntmaster-problem
@@ -2,7 +2,6 @@
 use v5.14;
 
 use Gruntmaster::Data;
-use Gruntmaster::Page::Submit;
 
 use IO::Prompter [ -style => 'bold', '-stdio', '-verbatim' ];
 use File::Slurp qw/read_file/;
@@ -21,7 +20,7 @@ sub prompt_file{
        my ($meta, $name, $prefix) = @_;
        my $filename = prompt '$prefix filename', -complete => 'filenames';
        $meta->{files}{$name}{content} = read_file $filename;
-       $meta->{files}{$name}{format} = prompt '$prefix format', -menu => Gruntmaster::Page::Submit::FORMATS;
+       $meta->{files}{$name}{format} = prompt '$prefix format', -menu => [qw/C CPP MONO JAVA PASCAL PERL PYTHON/];
        $meta->{files}{$name}{name} = prompt "$prefix filename [$filename]", -default => $filename;
 }