Lines 708-714
sub checkauth {
Link Here
|
708 |
# Finally, after those tests, we can assume (although if it would be better with |
708 |
# Finally, after those tests, we can assume (although if it would be better with |
709 |
# a syspref) that if we get a REMOTE_USER, that's from basic authentication, |
709 |
# a syspref) that if we get a REMOTE_USER, that's from basic authentication, |
710 |
# and we can affect it to $userid. |
710 |
# and we can affect it to $userid. |
711 |
if ( !$shib and $ENV{'REMOTE_USER'} ne '' and $userid = $ENV{'REMOTE_USER'} ) { |
711 |
if ( !$shib and defined($ENV{'REMOTE_USER'}) and $ENV{'REMOTE_USER'} ne '' and $userid = $ENV{'REMOTE_USER'} ) { |
712 |
|
712 |
|
713 |
# Using Basic Authentication, no cookies required |
713 |
# Using Basic Authentication, no cookies required |
714 |
$cookie = $query->cookie( |
714 |
$cookie = $query->cookie( |
715 |
- |
|
|