|
Lines 934-950
sub checkauth {
Link Here
|
| 934 |
my $value = $query->param($name); |
934 |
my $value = $query->param($name); |
| 935 |
push @inputs, { name => $name, value => $value }; |
935 |
push @inputs, { name => $name, value => $value }; |
| 936 |
} |
936 |
} |
| 937 |
# get the branchloop, which we need for authentication |
|
|
| 938 |
my $branches = GetBranches(); |
| 939 |
my @branch_loop; |
| 940 |
for my $branch_hash (sort keys %$branches) { |
| 941 |
push @branch_loop, {branchcode => "$branch_hash", branchname => $branches->{$branch_hash}->{'branchname'}, }; |
| 942 |
} |
| 943 |
|
937 |
|
| 944 |
my $template_name = ( $type eq 'opac' ) ? 'opac-auth.tmpl' : 'auth.tmpl'; |
938 |
my $template_name = ( $type eq 'opac' ) ? 'opac-auth.tmpl' : 'auth.tmpl'; |
| 945 |
my $template = C4::Templates::gettemplate($template_name, $type, $query ); |
939 |
my $template = C4::Templates::gettemplate($template_name, $type, $query ); |
| 946 |
$template->param( |
940 |
$template->param( |
| 947 |
branchloop => \@branch_loop, |
941 |
branchloop => GetBranchesLoop(), |
| 948 |
opaccolorstylesheet => C4::Context->preference("opaccolorstylesheet"), |
942 |
opaccolorstylesheet => C4::Context->preference("opaccolorstylesheet"), |
| 949 |
opaclayoutstylesheet => C4::Context->preference("opaclayoutstylesheet"), |
943 |
opaclayoutstylesheet => C4::Context->preference("opaclayoutstylesheet"), |
| 950 |
login => 1, |
944 |
login => 1, |