|
Lines 793-798
sub checkauth {
Link Here
|
| 793 |
my $emailaddress = shift; |
793 |
my $emailaddress = shift; |
| 794 |
$type = 'opac' unless $type; |
794 |
$type = 'opac' unless $type; |
| 795 |
|
795 |
|
|
|
796 |
$authnotrequired = 0 unless C4::Context->preference("OpacPublic"); |
| 796 |
my $dbh = C4::Context->dbh; |
797 |
my $dbh = C4::Context->dbh; |
| 797 |
my $timeout = _timeout_syspref(); |
798 |
my $timeout = _timeout_syspref(); |
| 798 |
|
799 |
|
| 799 |
- |
|
|