Subversion Repositories VORC

Rev

Rev 50 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 50 Rev 53
Line 16... Line 16...
16
$user->{department} = convertDepartments $user->{department};
16
$user->{department} = convertDepartments $user->{department};
17
my $DepartmentNames = getDepartments ();
17
my $DepartmentNames = getDepartments ();
18
my $username = $user->{derby_name};
18
my $username = $user->{derby_name};
19
my $RCid = $user->{RCid};
19
my $RCid = $user->{RCid};
20
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
20
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
21
my $YEAR = "2023";
21
my $YEAR = 1900 + (localtime)[5];
Line 22... Line 22...
22
 
22
 
23
 
23
 
24
my $pageTitle = "Manage Shift";
24
my $pageTitle = "Manage Shift";