[Koha-cvs] CVS: koha/C4 Biblio.pm,1.89,1.90

[Paul POULAIN]

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

Modified Files:
        Biblio.pm 
Log Message:
hidding hidden & isurl constraints into MARC subfield structure

Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.89
retrieving revision 1.90
diff -C2 -r1.89 -r1.90
*** Biblio.pm   27 May 2004 21:47:21 -0000      1.89
--- Biblio.pm   28 May 2004 08:25:53 -0000      1.90
***************
*** 240,244 ****
        }
  
!       $sth=$dbh->prepare("select tagfield,tagsubfield,$libfield as lib,tab, 
mandatory, 
repeatable,authorised_value,thesaurus_category,value_builder,kohafield,seealso 
from marc_subfield_structure where itemtype=? order by tagfield,tagsubfield");
        $sth->execute($itemtype);
  
--- 240,244 ----
        }
  
!       $sth=$dbh->prepare("select tagfield,tagsubfield,$libfield as lib,tab, 
mandatory, 
repeatable,authorised_value,thesaurus_category,value_builder,kohafield,seealso,hidden,isurl
 from marc_subfield_structure where itemtype=? order by tagfield,tagsubfield");
        $sth->execute($itemtype);
  
***************
*** 249,253 ****
        my $kohafield;
        my $seealso;
!       while ( ($tag, $subfield, $lib, $tab, $mandatory, 
$repeatable,$authorised_value,$thesaurus_category,$value_builder,$kohafield,$seealso)
 = $sth->fetchrow) {
                $res->{$tag}->{$subfield}->{lib}=$lib;
                $res->{$tag}->{$subfield}->{tab}=$tab;
--- 249,255 ----
        my $kohafield;
        my $seealso;
!       my $hidden;
!       my $isurl;
!       while ( ($tag, $subfield, $lib, $tab, $mandatory, 
$repeatable,$authorised_value,$thesaurus_category,$value_builder,$kohafield,$seealso,$hidden,$isurl)
 = $sth->fetchrow) {
                $res->{$tag}->{$subfield}->{lib}=$lib;
                $res->{$tag}->{$subfield}->{tab}=$tab;
***************
*** 259,262 ****
--- 261,266 ----
                $res->{$tag}->{$subfield}->{kohafield}=$kohafield;
                $res->{$tag}->{$subfield}->{seealso}=$seealso;
+               $res->{$tag}->{$subfield}->{hidden}=$hidden;
+               $res->{$tag}->{$subfield}->{isurl}=$isurl;
        }
        return $res;
***************
*** 2200,2203 ****
--- 2204,2210 ----
  # $Id$
  # $Log$
+ # Revision 1.90  2004/05/28 08:25:53  tipaul
+ # hidding hidden & isurl constraints into MARC subfield structure
+ #
  # Revision 1.89  2004/05/27 21:47:21  rangi
  # Fix for bug 787