Bug Fixing :

- new authoritiessearch API (without $dbh)
- new search API (using ccl)

diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-authoritiessearchresultlist.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-authoritiessearchresultlist.tmpl
index 7e3706f..e7cc6e5 100644 (file)
--- a/koha-tmpl/opac-tmpl/prog/en/opac-authoritiessearchresultlist.tmpl
+++ b/koha-tmpl/opac-tmpl/prog/en/opac-authoritiessearchresultlist.tmpl
@@ -49,7 +49,7 @@
                                                </td>
                                        <!-- TMPL_UNLESS name="isEDITORS" -->
                                                <td>
-                                                        <a href="/cgi-bin/koha/opac-search.pl?type=opac&amp;op=do_search&amp;marclist=<!-- TMPL_VAR NAME="biblio_fields" -->&amp;operator==&amp;value=<!-- TMPL_VAR NAME="authid" -->&amp;and_or=and&amp;excluding="><!-- TMPL_VAR NAME="used" --> biblios</a>
+                                                        <a href="/cgi-bin/koha/opac-search.pl?type=opac&amp;op=do_search&amp;q=an=<!--TMPL_VAR Name="authid" -->" class="button authority"><!-- TMPL_VAR NAME="used" --> biblios</a>
                                                </td>
                                        <!-- /TMPL_UNLESS -->
                                                <td>

diff --git a/opac/opac-authorities-home.pl b/opac/opac-authorities-home.pl
index 4cd3fe8..5eee0c0 100755 (executable)
--- a/opac/opac-authorities-home.pl
+++ b/opac/opac-authorities-home.pl
@@ -56,17 +56,18 @@ foreach my $thisauthtype ( sort { $authtypes->{$a} <=> $authtypes->{$b} }
 }
 
 if ( $op eq "do_search" ) {
-    my @marclist  = $query->param('marclist');
-    my @and_or    = $query->param('and_or');
-    my @excluding = $query->param('excluding');
-    my @operator  = $query->param('operator');
-    my @value     = $query->param('value');
+       my @marclist = $query->param('marclist');
+       my @and_or = $query->param('and_or');
+       my @excluding = $query->param('excluding');
+       my @operator = $query->param('operator');
+       my $orderby = $query->param('orderby');
+       my @value = $query->param('value');
 
     $resultsperpage = $query->param('resultsperpage');
     $resultsperpage = 19 if ( !defined $resultsperpage );
     my @tags;
     my ( $results, $total, @fields ) =
-      authoritysearch( $dbh, \@marclist, \@and_or, \@excluding, \@operator,
+      authoritysearch( \@marclist, \@and_or, \@excluding, \@operator,
         \@value, $startfrom * $resultsperpage,
         $resultsperpage, $authtypecode );
     ( $template, $loggedinuser, $cookie ) = get_template_and_user(