Bump version and update Changes

[gruntmaster-data.git] / gruntmaster-contest

diff --git a/gruntmaster-contest b/gruntmaster-contest
index 856faae6d7698fbc08b396ccb6f07defd7b92444..c6d1db80325b289833d85494263df678c4f65065 100755 (executable)
--- a/gruntmaster-contest
+++ b/gruntmaster-contest
@@ -33,17 +33,18 @@ END
 }
 
 sub cmd_add{
-       my $id = shift;
+       my ($id) = @_;
        my $name = prompt 'Contest name';
        my $owner = prompt 'Owner';
        my $start = str2time prompt 'Start time' or die 'Cannot parse time';
        my $stop = str2time prompt 'Stop time' or die 'Cannot parse time';
 
-       $db->contests->create({id => $id, name => $name, owner => $owner, start => $start, stop => $stop})
+       $db->contests->create({id => $id, name => $name, owner => $owner, start => $start, stop => $stop});
 }
 
 sub cmd_rm{
-       $db->contest(shift)->delete
+       my ($id) = @_;
+       $db->contest(shift)->delete;
 }
 
 sub cmd_get{
@@ -53,7 +54,7 @@ sub cmd_get{
 
 sub cmd_set{
        my ($id, %values) = @_;
-       $db->contest($id)->update(\%values)
+       $db->contest($id)->update(\%values);
 }
 
 ##################################################