X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FPlack%2FApp%2FGruntmaster.pm;h=c590bc9e2309977edb92554854dd0e66c8605e8b;hb=bd5ea970657ae9a16ed69748ce9e3feb361c658a;hp=3ec4e78300fd623a2c85457c0e5b07c715d2de18;hpb=6e5676003ac8290ccbfe86743c9ee2e2ad226f96;p=gruntmaster-page.git

diff --git a/lib/Plack/App/Gruntmaster.pm b/lib/Plack/App/Gruntmaster.pm
index 3ec4e78..c590bc9 100644
--- a/lib/Plack/App/Gruntmaster.pm
+++ b/lib/Plack/App/Gruntmaster.pm
@@ -47,6 +47,7 @@ use constant FORMAT_EXTENSION => {
 	PASCAL => 'pas',
 	PERL => 'pl',
 	PYTHON => 'py',
+	SBCL => 'l',
 };
 
 use constant NOT_FOUND => [404, ['Content-Type' => 'text/plain'], ['Not found']];
@@ -159,7 +160,8 @@ sub dispatch_request{
 
 		sub (/ed/:contest) {
 			forbid contest->is_running;
-			response ed => 'Editorial of ' . contest->name, db->problem_list(contest => $_{contest}, solution => 1);
+			my $pblist = db->problem_list(contest => $_{contest}, solution => 1);
+			response ed => 'Editorial of ' . contest->name, {%$pblist, editorial => contest->editorial};
 		},
 
 		sub (/login) {