Subversion Repositories ORC

Rev

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

Rev 27 Rev 28
Line 17... Line 17...
17
# Add checking to make sure they're in this department
17
# Add checking to make sure they're in this department
18
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;
18
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;
19
my $user = getUser ($EML);
19
my $user = getUser ($EML);
20
$user->{department} = convertDepartments $user->{department};
20
$user->{department} = convertDepartments $user->{department};
Line 21... Line 21...
21
 
21
 
22
if ($user->{department}->{"ANN"} < 1 or $LVL < 4) {
22
if ($user->{department}->{"ANN"} < 1 and $LVL < 4) {
23
	print header(-cookie=>$RCAUTH_cookie);
23
	print header(-cookie=>$RCAUTH_cookie);
24
	printRCHeader("Unauthorized Page");
24
	printRCHeader("Unauthorized Page");
25
	print $h->div ({ class=>"error" }, "You're not an Announcer");
25
	print $h->div ({ class=>"error" }, "You're not an Announcer");
26
	print $h->div ("Your user account is not registered as an Announcer, so you can't see these shifts.  It's possible that your access is still being reviewed.  Please be patient.");
26
	print $h->div ("Your user account is not registered as an Announcer, so you can't see these shifts.  It's possible that your access is still being reviewed.  Please be patient.");