From: Steinar H. Gunderson Date: Sun, 24 Apr 2005 20:15:15 +0000 (+0000) Subject: Combined patch (sorry): fix URL, fix points awarded. X-Git-Url: https://git.sesse.net/?p=ccbs;a=commitdiff_plain;h=bd55f6835567a11e5a490d4a872bc778c96d1e83 Combined patch (sorry): fix URL, fix points awarded. --- diff --git a/html/ccbs.pm b/html/ccbs.pm index f5deada..d4bc6bc 100755 --- a/html/ccbs.pm +++ b/html/ccbs.pm @@ -25,7 +25,7 @@ sub print_see_other { my $location = shift; print CGI::header(-status=>'303 See other', - -location=>'http://192.168.1.200/' . $location, + -location=>'http://ccbs.sesse.net/' . $location, -type=>'text/html; charset=utf-8'); } diff --git a/html/do-finish-tournament.pl b/html/do-finish-tournament.pl index bea25b4..bf53b91 100755 --- a/html/do-finish-tournament.pl +++ b/html/do-finish-tournament.pl @@ -35,13 +35,13 @@ $dbh->disconnect; ccbs::print_see_other('show-tournament.pl?id=' . $tournament); -# gives the usual 100, 91, 83, 76. 65, 61, ... series +# gives the usual 100, 90, 81, 73, 60, 55, ... series sub points_for_place { my $n = shift; if ($n <= 10) { - return 110 - (21/2) * $n + (1/2) * $n * $n; - } elsif ($n <= 65) { - return 65 - $n; + return 111 - (23/2) * $n + (1/2) * $n * $n; + } elsif ($n <= 56) { + return 56 - $n; } else { return 0; }