[Koha-cvs] CVS: koha/value_builder unimarc_field_225a.pl,1.8,1.8.2.1

[Paul POULAIN]

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

Modified Files:
      Tag: rel_2_2
        unimarc_field_225a.pl 
Log Message:
fix to show seriestitle even for books without isbn (but with a editor, of 
course)

Index: unimarc_field_225a.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_field_225a.pl,v
retrieving revision 1.8
retrieving revision 1.8.2.1
diff -C2 -r1.8 -r1.8.2.1
*** unimarc_field_225a.pl       23 Sep 2004 16:33:13 -0000      1.8
--- unimarc_field_225a.pl       11 Jan 2005 17:41:44 -0000      1.8.2.1
***************
*** 119,123 ****
        # if there is an isbn, complete search
                my @collections;
-       if ($isbn_found) {
                my $sth = $dbh->prepare("select 
auth_subfield_table.authid,subfieldvalue from auth_subfield_table 
                                                left join auth_header on 
auth_subfield_table.authid=auth_header.authid 
--- 119,122 ----
***************
*** 135,146 ****
                        }
                }
-       } else {
-       # if there is no isbn, search with %
-               my $sth = $dbh->prepare("select stdlib from bibliothesaurus 
where father like ? and category='EDITORS' order by stdlib");
-               $sth->execute("\%$authoritysep $editor_found $authoritysep");
-               while (my ($line)= $sth->fetchrow) {
-                       push @collections,$line;
-               }
-       }
  #     my @collections = ["test"];
        my $collection =CGI::scrolling_list(-name=>'f1',
--- 134,137 ----