[Koha-cvs] CVS: koha/C4 Bull.pm,1.6.2.4,1.6.2.5

[Paul POULAIN]

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

Modified Files:
      Tag: rel_2_2
        Bull.pm 
Log Message:
fixing bug in issn search

Index: Bull.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Bull.pm,v
retrieving revision 1.6.2.4
retrieving revision 1.6.2.5
diff -C2 -r1.6.2.4 -r1.6.2.5
*** Bull.pm     25 Mar 2005 16:26:38 -0000      1.6.2.4
--- Bull.pm     28 Apr 2005 08:49:40 -0000      1.6.2.5
***************
*** 232,237 ****
                $sth->execute($biblionumber);
        } else {
!               $sth = $dbh->prepare("select 
subscription.subscriptionid,biblio.title,biblioitems.issn,subscription.notes 
from subscription,biblio,biblioitems where  biblio.biblionumber = 
biblioitems.biblionumber and biblio.biblionumber=subscription.biblionumber and 
(biblio.title like ? or biblioitems.issn = ? )");
!               $sth->execute("%$title%",$ISSN);
        }
                my @results;
--- 232,254 ----
                $sth->execute($biblionumber);
        } else {
!               if ($ISSN and $title)
!               {
!                       $sth = $dbh->prepare("select 
subscription.subscriptionid,biblio.title,biblioitems.issn,subscription.notes 
from subscription,biblio,biblioitems where  biblio.biblionumber = 
biblioitems.biblionumber and biblio.biblionumber=subscription.biblionumber and 
(biblio.title like ? or biblioitems.issn = ? )");
!                       $sth->execute("%$title%",$ISSN);
!               }
!               else
!               {
!                       if ($ISSN)
!                       {
!                               $sth = $dbh->prepare("select 
subscription.subscriptionid,biblio.title,biblioitems.issn,subscription.notes 
from subscription,biblio,biblioitems where  biblio.biblionumber = 
biblioitems.biblionumber and biblio.biblionumber=subscription.biblionumber and 
biblioitems.issn = ?");
!                               $sth->execute($ISSN);
!                       }
!                       else
!                       {
!                               $sth = $dbh->prepare("select 
subscription.subscriptionid,biblio.title,biblioitems.issn,subscription.notes 
from subscription,biblio,biblioitems where  biblio.biblionumber = 
biblioitems.biblionumber and
!  biblio.biblionumber=subscription.biblionumber and biblio.title like ? ");
!                               $sth->execute("%$title%");
!                       }
!               }
        }
                my @results;