Subversion Repositories VORC

Rev

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

Rev 29 Rev 50
Line 32... Line 32...
32
 
32
 
33
my $username = $h->a ({ href=>"/schedule/manage_user.pl?submit=View&RCid=$user->{RCid}" }, $user->{derby_name});
33
my $username = $h->a ({ href=>"/schedule/manage_user.pl?submit=View&RCid=$user->{RCid}" }, $user->{derby_name});
34
my $RCid = $user->{RCid};
34
my $RCid = $user->{RCid};
35
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
35
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
36
#my $YEAR = 1900 + (localtime)[5]; #which year of data to display, default to current
36
#my $YEAR = 1900 + (localtime)[5]; #which year of data to display, default to current
Line 37... Line 37...
37
my $YEAR = "2022";
37
my $YEAR = "2023";
Line 38... Line 38...
38
 
38
 
39
#$LVL = 1;
39
#$LVL = 1;
Line 116... Line 116...
116
 		}
116
 		}
117
 	}
117
 	}
118
 	return $t->{derby_name};
118
 	return $t->{derby_name};
119
}
119
}
Line -... Line 120...
-
 
120
 
-
 
121
sub modify_time {
-
 
122
  my $t = shift;
120
 
123
  return convertTime $t->{time};
Line 121... Line 124...
121
 
124
}
122
 
125