X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=members%2Fmember.pl;h=bc1980c385a7591bf2fa398067317de2297ecb1f;hb=a97aab0212f2d41221df3b387d57e1dd03f539e9;hp=1ae50f3bd8e2e958725745593681ae041bf32220;hpb=7540dda2eb5b2914ca7428e9a28e536d44d71980;p=koha.git diff --git a/members/member.pl b/members/member.pl index 1ae50f3bd8..bc1980c385 100755 --- a/members/member.pl +++ b/members/member.pl @@ -37,24 +37,14 @@ my $quicksearch = $input->param('quicksearch'); my $startfrom = $input->param('startfrom')||1; my $resultsperpage = $input->param('resultsperpage')||C4::Context->preference("PatronsPerPage")||20; -my ($template, $loggedinuser, $cookie); -if($quicksearch){ - ($template, $loggedinuser, $cookie) - = get_template_and_user({template_name => "members/member-quicksearch-results.tmpl", - query => $input, - type => "intranet", - authnotrequired => 0, - flagsrequired => {borrowers => 1}, - }); -} else { - ($template, $loggedinuser, $cookie) +my ($template, $loggedinuser, $cookie) = get_template_and_user({template_name => "members/member.tmpl", query => $input, type => "intranet", authnotrequired => 0, flagsrequired => {borrowers => 1}, }); -} + my $theme = $input->param('theme') || "default"; my $patron = $input->Vars; @@ -89,9 +79,9 @@ if ($orderbyparams){ push @orderby, {$orderbyelt[0]=>$orderbyelt[1]||0}; } else { - @orderby = ({surname=>1},{firstname=>1}); + @orderby = ({firstname=>1},{surname=>1}); } -warn Data::Dumper::Dumper(@orderby); + $member =~ s/,//g; #remove any commas from search string $member =~ s/\*/%/g; @@ -151,6 +141,9 @@ my $base_url = map { "$_=$parameters{$_}" } (keys %parameters) ); +my @letters = map { {letter => $_} } ( 'A' .. 'Z'); +$template->param( letters => \@letters ); + $template->param( paginationbar => pagination_bar( $base_url, int( $count / $resultsperpage ) + 1,