[Koha-cvs] CVS: koha/C4 Maintainance.pm,1.13,1.14

[Chris Cormack]

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

Modified Files:
        Maintainance.pm 
Log Message:
Fixing some bogus sql


Index: Maintainance.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Maintainance.pm,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -r1.13 -r1.14
*** Maintainance.pm     22 Dec 2003 19:16:58 -0000      1.13
--- Maintainance.pm     15 Mar 2004 20:24:13 -0000      1.14
***************
*** 80,85 ****
    my ($sub,$num,$offset)address@hidden;
    my $dbh = C4::Context->dbh;
!   my $query="Select * from bibliosubject where subject like '?%' group by 
subject";
!   my @bind = ($sub);
    # FIXME - Make $num and $offset optional.
    # If $num was given, make sure $offset was, too.
--- 80,85 ----
    my ($sub,$num,$offset)address@hidden;
    my $dbh = C4::Context->dbh;
!   my $query="Select * from bibliosubject where subject like ? group by 
subject";
!   my @bind = ("$sub%");
    # FIXME - Make $num and $offset optional.
    # If $num was given, make sure $offset was, too.
***************
*** 157,162 ****
    my ($title)address@hidden;
    my $dbh = C4::Context->dbh;
!   my $sth=$dbh->prepare("Select * from deletedbiblio where title like '?%' 
order by title");
!   $sth->execute($title);
    my @results;
    my $i=0;
--- 157,162 ----
    my ($title)address@hidden;
    my $dbh = C4::Context->dbh;
!   my $sth=$dbh->prepare("Select * from deletedbiblio where title like ? order 
by title");
!   $sth->execute("$title%");
    my @results;
    my $i=0;