[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.52.2.13,1.52.2.14

[Paul POULAIN]

Update of /cvsroot/koha/koha/acqui.simple
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5584/acqui.simple

Modified Files:
      Tag: rel_2_2
        addbiblio.pl 
Log Message:
* adding a feature to enable reordering of subfields in MARC editor (can be 
considered as a bug ? at least one of my libraries think that yes !)
* as the MARC editor begins to be really heavy, i've also added a marc_hide 
systempref. It hides all marc features not requested by libraries that want 
MARC but not too much. It hides MARC tag & subfield code, reordering buttons as 
well as indicators. by default, hide_marc is off

Index: addbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbiblio.pl,v
retrieving revision 1.52.2.13
retrieving revision 1.52.2.14
diff -C2 -r1.52.2.13 -r1.52.2.14
*** addbiblio.pl        9 Sep 2005 08:19:57 -0000       1.52.2.13
--- addbiblio.pl        25 Oct 2005 12:36:21 -0000      1.52.2.14
***************
*** 173,176 ****
--- 173,177 ----
        $subfield_data{repeatable}=$tagslib->{$tag}->{$subfield}->{repeatable};
        $subfield_data{kohafield}=$tagslib->{$tag}->{$subfield}->{kohafield};
+       $subfield_data{index} = $i;
        # it's an authorised field
        if ($tagslib->{$tag}->{$subfield}->{authorised_value}) {
***************
*** 277,281 ****
                                        }
  # If there is more than 1 field, add an empty hidden field as separator.
!                                       if ($#fields >=1) {
                                                my @subfields_data;
                                                my %tag_data;
--- 278,282 ----
                                        }
  # If there is more than 1 field, add an empty hidden field as separator.
!                                       if ($#fields >=1 && $#loop_data >=0 && 
$loop_data[$#loop_data]->{'tag'} eq $tag) {
                                                my @subfields_data;
                                                my %tag_data;
***************
*** 524,528 ****
  $template->param(
                frameworkcode => $frameworkcode,
!               itemtype => $frameworkcode # HINT: if the library has itemtype 
= framework, itemtype is auto filled !
                );
  output_html_with_http_headers $input, $cookie, $template->output;
\ No newline at end of file
--- 525,530 ----
  $template->param(
                frameworkcode => $frameworkcode,
!               itemtype => $frameworkcode, # HINT: if the library has itemtype 
= framework, itemtype is auto filled !
!               hide_marc => C4::Context->preference('hide_marc'),
                );
  output_html_with_http_headers $input, $cookie, $template->output;
\ No newline at end of file