[Koha-cvs] CVS: koha/admin marctagstructure.pl,1.23,1.24

[doXulting]

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

Modified Files:
        marctagstructure.pl 
Log Message:
debugged framework interface. Frameworks for ensmp are ready too

Index: marctagstructure.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/marctagstructure.pl,v
retrieving revision 1.23
retrieving revision 1.24
diff -C2 -r1.23 -r1.24
*** marctagstructure.pl 17 Jun 2004 08:18:42 -0000      1.23
--- marctagstructure.pl 25 Jun 2004 09:18:08 -0000      1.24
***************
*** 291,295 ****
        $sth_insert = $dbh->prepare("insert into marc_subfield_structure 
(frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,authorised_value,authtypecode,value_builder,seealso)
 values (?,?,?,?,?,?,?,?,?,?,?,?,?)");
        while ( my ($frameworkcode, $tagfield, $tagsubfield, $liblibrarian, 
$libopac, $repeatable, $mandatory, $kohafield, $tab, $authorised_value, 
$thesaurus_category, $value_builder, $seealso) = $sth->fetchrow) {
!               $sth_insert->execute($newframeworkcode, $tagfield, 
$tagsubfield, $liblibrarian, $libopac, $repeatable, $mandatory, $kohafield, 
$tab, $authorised_value, $thesaurus_category, $value_builder, $seealso);
        }
  }
--- 291,295 ----
        $sth_insert = $dbh->prepare("insert into marc_subfield_structure 
(frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,authorised_value,authtypecode,value_builder,seealso)
 values (?,?,?,?,?,?,?,?,?,?,?,?,?)");
        while ( my ($frameworkcode, $tagfield, $tagsubfield, $liblibrarian, 
$libopac, $repeatable, $mandatory, $kohafield, $tab, $authorised_value, 
$thesaurus_category, $value_builder, $seealso) = $sth->fetchrow) {
!           $sth_insert->execute($newframeworkcode, $tagfield, $tagsubfield, 
$liblibrarian, $libopac, $repeatable, $mandatory, $kohafield, $tab, 
$authorised_value, $thesaurus_category, $value_builder, $seealso);
        }
  }