[Koha-cvs] CVS: koha/C4 AuthoritiesMarc.pm,1.16,1.17

[Paul POULAIN]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13572/C4

Modified Files:
        AuthoritiesMarc.pm 
Log Message:
some fixes & improvements for dictionnary search in librarian interface

Index: AuthoritiesMarc.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/AuthoritiesMarc.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -C2 -r1.16 -r1.17
*** AuthoritiesMarc.pm  4 May 2005 15:43:43 -0000       1.16
--- AuthoritiesMarc.pm  1 Jun 2005 12:51:02 -0000       1.17
***************
*** 65,73 ****
        # the marclist may contain "mainentry". In this case, search the 
tag_to_report, that depends on
        # the authtypecode. Then, search on $a of this tag_to_report
        for (my $i=0;$i<$#{$tags};$i++) {
                if (@$tags[$i] eq "mainentry") {
-                       my $sth = $dbh->prepare("select auth_tag_to_report from 
auth_types where authtypecode=?");
-                       $sth->execute($authtypecode);
-                       my ($tag_to_report) = $sth->fetchrow;
                        @$tags[$i] = $tag_to_report."a";
                }
--- 65,76 ----
[...1010 lines suppressed...]
- #
- # Revision 1.6  2004/08/18 16:00:24  tipaul
- # fixes for authorities management
- #
- # Revision 1.5  2004/07/05 13:37:22  doxulting
- # First step for working authorities
- #
- # Revision 1.4  2004/06/22 11:35:37  tipaul
- # removing % at the beginning of a string to avoid loooonnnngggg searchs
- #
- # Revision 1.3  2004/06/17 08:02:13  tipaul
- # merging tag & subfield in auth_word for better perfs
- #
- # Revision 1.2  2004/06/10 08:29:01  tipaul
- # MARC authority management (continued)
- #
- # Revision 1.1  2004/06/07 07:35:01  tipaul
- # MARC authority management package
- #
--- 968,969 ----