[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