Subversion Repositories VORC

Rev

Rev 35 | Rev 53 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 35 Rev 50
Line 21... Line 21...
21 
our ($EML, $PWD, $LVL);
 21 
our ($EML, $PWD, $LVL);
22 
my $user;
 22 
my $user;
23 
my $username;
 23 
my $username;
24 
my $RCid;
 24 
my $RCid;
25 
my $RCAUTH_cookie;
 25 
my $RCAUTH_cookie;
26 
my $YEAR = "2022";
 26 
my $YEAR = "2023";
Line 27... Line 27...
27 
 
 27 
 
28 
if ($secure) {
 28 
if ($secure) {
29 
	$cookie_string = authenticate(2) || die;
 29 
	$cookie_string = authenticate(2) || die;
30 
	($EML, $PWD, $LVL) = split /&/, $cookie_string;
 30 
	($EML, $PWD, $LVL) = split /&/, $cookie_string;
Line 80... Line 80...
80 
 		if ($t->{team1_score} > $t->{team2_score}) { $t->{team1} = "<b>$t->{team1}</b>"; } else { $t->{team2} = "<b>$t->{team2}</b>"; }
 80 
 		if ($t->{team1_score} > $t->{team2_score}) { $t->{team1} = "<b>$t->{team1}</b>"; } else { $t->{team2} = "<b>$t->{team2}</b>"; }
81 
  }
 81 
  }
82 
 	return $t->{team1};
 82 
 	return $t->{team1};
83 
}
 83 
}
Line -... Line 84...
- 
 
 84 
 
- 
 
 85 
sub modify_time {
- 
 
 86 
  my $t = shift;
- 
 
 87 
  return convertTime $t->{time};
Line 84... Line 88...
84 
 
 88 
}
85 
 
 89