Subversion Repositories PEEPS

Rev

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

Rev 22 Rev 24
Line 15... Line 15...
15
$ENV{HTTPS} = 'ON' if $ENV{SERVER_NAME} =~ /^peeps/;
15
$ENV{HTTPS} = 'ON' if $ENV{SERVER_NAME} =~ /^peeps/;
Line 16... Line 16...
16
 
16
 
17
my $cookie_string = authenticate (1) || die;
17
my $cookie_string = authenticate (1) || die;
18
my ($EML, $PWD, $LVL) = split /&/, $cookie_string;
18
my ($EML, $PWD, $LVL) = split /&/, $cookie_string;
19
my $user = $ORCUSER;
19
my $user = $ORCUSER;
20
my $RENEWAL_WINDOW = 900;   ### <-----------  CHANGE BACK AFTER TESTING!
20
my $RENEWAL_WINDOW = 90;
Line 21... Line 21...
21
#my $activated = $ORCUSER->{access};
21
#my $activated = $ORCUSER->{access};
22
 
22