[Koha-cvs] CVS: koha/value_builder unimarc_field_128b.pl,1.1,1.2

doXulting doxulting at users.sourceforge.net
Thu Jun 2 17:50:26 CEST 2005


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

Modified Files:
	unimarc_field_128b.pl 
Log Message:
Plugin for field 128b

Index: unimarc_field_128b.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_field_128b.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** unimarc_field_128b.pl	7 Jun 2004 10:07:40 -0000	1.1
--- unimarc_field_128b.pl	2 Jun 2005 15:50:23 -0000	1.2
***************
*** 53,57 ****
  function Clic$function_name(i) {
  	defaultvalue=document.forms[0].field_value[i].value;
! 	newin=window.open(\"../plugin_launcher.pl?plugin_name=unimarc_field_128b.pl&index=\"+i+\"&result=\"+defaultvalue,\"unimarc field 128b\",'width=1000,height=375,toolbar=false,scrollbars=yes');
  
  }
--- 53,57 ----
  function Clic$function_name(i) {
  	defaultvalue=document.forms[0].field_value[i].value;
! 	newin=window.open(\"../plugin_launcher.pl?plugin_name=unimarc_field_128b.pl&index=\"+i+\"&result=\"+defaultvalue,\"unimarc field 128b\",'width=800,height=400,toolbar=false,scrollbars=yes');
  
  }
***************
*** 81,86 ****
  			     });
  	my $f1 = substr($result,0,2);
  	$template->param(index => $index,
! 			 "f1$f1" => $f1);
  	print $input->header(-cookie => $cookie),$template->output;
  }
--- 81,88 ----
  			     });
  	my $f1 = substr($result,0,2);
+ 	my $f2 = substr($result,2,2);
  	$template->param(index => $index,
! 			 "f1$f1" => $f1,
! 			f2 => $f2);
  	print $input->header(-cookie => $cookie),$template->output;
  }





More information about the Koha-cvs mailing list