X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=gruntmaster-contest;h=c2608c9300c26dcdb3915337fe13df12d076fbd4;hb=e0f96c91c9a2336893b36a11142e0a55fd3c9851;hp=e61a6c2ec9051244609e45ad660bc4915bbfc133;hpb=adfcbf49c9a50ffc4d6f273a5837c0108125b55c;p=plack-app-gruntmaster.git

diff --git a/gruntmaster-contest b/gruntmaster-contest
index e61a6c2..c2608c9 100755
--- a/gruntmaster-contest
+++ b/gruntmaster-contest
@@ -1,11 +1,9 @@
 #!/usr/bin/perl -w
 use v5.14;
 
-use Gruntmaster::Data qw/contests insert_contest remove_contest contest_name contest_owner contest_start contest_end/;
+use Gruntmaster::Data;
 
 use IO::Prompter [ -style => 'bold', '-stdio', '-verbatim' ];
-use File::Slurp qw/read_file/;
-use Term::ANSIColor qw/RED RESET/;
 use POSIX qw/strftime/;
 use Date::Parse qw/str2time/;
 
@@ -36,10 +34,13 @@ sub cmd_add{
 	my $end = str2time prompt 'End time' or die 'Cannot parse time';
 
 	insert_contest $id => name => $name, owner => $owner, start => $start, end => $end;
+	PUBLISH genpage => "ct/$id/index.html";
+	PUBLISH genpage => "ct/index.html";
 }
 
 sub cmd_rm{
 	remove_contest shift;
+	PUBLISH genpage => "ct/index.html";
 }
 
 ##################################################