[Koha-cvs] CVS: koha/admin marctagstructure.pl,1.10,1.11

[Paul POULAIN]

Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1:/tmp/cvs-serv29611/admin

Modified Files:
        marctagstructure.pl 
Log Message:
small bugfix to search on >= and not >

Index: marctagstructure.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/marctagstructure.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** marctagstructure.pl 18 Dec 2002 10:55:16 -0000      1.10
--- marctagstructure.pl 18 Dec 2002 10:56:41 -0000      1.11
***************
*** 34,38 ****
        my @data=split(' ',$searchstring);
        my address@hidden;
!       my $query="Select 
tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from 
marc_tag_structure where (tagfield > $data[0]) order by tagfield";
        my $sth=$dbh->prepare($query);
        $sth->execute;
--- 34,38 ----
        my @data=split(' ',$searchstring);
        my address@hidden;
!       my $query="Select 
tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value from 
marc_tag_structure where (tagfield >= $data[0]) order by tagfield";
        my $sth=$dbh->prepare($query);
        $sth->execute;