X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=gruntmaster-genallpages;h=2d1709e7479724351e769ad1cf3645b7fd813cbb;hb=a94f84535623ae0de44b63290aa4c8b1bf3e5eaa;hp=efa61fb18cd87fdfeab93084222fcddeb64584b7;hpb=4aa8ba862bf3a79362df73c3d1e8707e8135af23;p=plack-app-gruntmaster.git

diff --git a/gruntmaster-genallpages b/gruntmaster-genallpages
index efa61fb..2d1709e 100755
--- a/gruntmaster-genallpages
+++ b/gruntmaster-genallpages
@@ -3,27 +3,24 @@ use v5.14;
 
 use Gruntmaster::Page;
 use Gruntmaster::Page::Log;
-use Gruntmaster::Data qw/contests jobcard problems users/;
+use Gruntmaster::Data qw/contests jobcard problems users PUBLISH/;
 
 sub generate{
   my $what = shift;
-  say STDERR "Generating $what";
-  Gruntmaster::Page::generate $what;
+  say STDERR "Generating page $what";
+  PUBLISH genpage => $what;
 }
 
-generate "index.html";
-generate "learn.html";
-
 generate "ct/index.html";
-generate "ct/$_/index.thml" for contests;
-generate "ct/$_/log/st.html" for contests;
+generate "ct/$_/index.html" for contests;
 
 generate "us/index.html";
 generate "us/$_.html" for users;
 
 for my $ct (undef, contests) {
-	local $Gruntmaster::Data::contests = $ct;
+	local $Gruntmaster::Data::contest = $ct;
 	my $ctp = defined $ct ? "ct/$ct/" : '';
+	generate "${ctp}log/st.html";
 	generate "${ctp}log/index.html";
 	my $pagecnt = jobcard / Gruntmaster::Page::Log::PAGE_SIZE;
 	generate "${ctp}log/$_.html" for 1 .. $pagecnt;