[Koha-cvs] CVS: koha/value_builder unimarc_field_210c.pl,1.3,1.3.2.1

Paul POULAIN tipaul at users.sourceforge.net
Mon Jan 26 11:43:35 CET 2004


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

Modified Files:
      Tag: rel_2_0
	unimarc_field_210c.pl 
Log Message:
replacing " by "

Index: unimarc_field_210c.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_field_210c.pl,v
retrieving revision 1.3
retrieving revision 1.3.2.1
diff -C2 -r1.3 -r1.3.2.1
*** unimarc_field_210c.pl	1 Aug 2003 14:20:51 -0000	1.3
--- unimarc_field_210c.pl	26 Jan 2004 10:43:32 -0000	1.3.2.1
***************
*** 78,82 ****
  $res .= "
  ];
! 	// search isbn subfield. it's 010a
  	var isbn_found;
  	for (i=0 ; i<document.f.field_value.length ; i++) {
--- 78,82 ----
  $res .= "
  ];
! 	// search isbn subfield. it''s 010a
  	var isbn_found;
  	for (i=0 ; i<document.f.field_value.length ; i++) {
***************
*** 115,120 ****
  my ($input) = @_;
  	my $index = $input->param("index");
! 	my $result = $input->param("result");
! 	print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=thesaurus_popup.pl?category=EDITORS&index=$index&result=$result\"></html>";
  	exit;
  }
--- 115,122 ----
  my ($input) = @_;
  	my $index = $input->param("index");
! 	my $result =  $input->param("result");
! 	$result=~s/ /&nbsp;/g;
! 	$result=~s/"/&quot;/g;
! 	print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=thesaurus_popup.pl?category=EDITORS&nohierarchy=1&index=$index&result=$result\"></html>";
  	exit;
  }





More information about the Koha-cvs mailing list